rise<-function(x)
+ {
+      for(i in 2:length(x)){
+       rise[i]<-(x[i]-x[i-1])/x[i]}
+    return(rise[i])
+ }
以上代码是本人编写的关于计算一组数据同比增长率的函数，error中显示Error in rise[i] <- (x[i] - x[i - 1])/x[i] :
  object of type 'closure' is not subsettable
>
大神请答复这是为什么？