增长率已经知道怎么求了，但不太明白其中的diff(x) 是什么含义，尝试过使用
ring.growth <- c(NA,diff(x))， 但结果不对