用for循环写了一个函数怎么存储结果,但是怎么把结果存储下来,还能保留这个函数呢,求解
ses<-function(x,y){
for(i in 1:length(y)){
x=0.2*y[i]+0.8*x
print(x)
}
}
ses(x=13,y=c(10,11,13,14,16,14,13))