Could anyone please tell me what is wrong with the R code below: i = 1.001 #make SAV and STO become vector