有像diff这个函数的滞后，但计算是除法的函数吗？

alansmith

如题，本人要计算一基金净值的日收益，但是找不到像diff一样，但计算是除法的滞后运算函数，论坛有达人知道这样的函数么？

358463121

y<-c(1,2,3,4,5)
y[-1]-y[-length(y)] #相当于diff(y)
y[-1]/y[-length(y)] #你要的功能

alansmith

358463121 发表于 2015-1-1 20:59
y

谢谢，你这个可以有，我也写了个函数：
rate<-function(x){
if(anyNA(x)==1){
x<-x[-which(is.na(x))]
}
a<-diff(x)
b<-a(-1)
c<-a/b*100
return(c)
}

不过相信你这个应该比我的更快