1.diff()函数
diff() 是R语言中的一个简单函数。该函数有三个基本参数：x, lag = 1 和 differences = 1。
Returns suitably lagged and iterated differences.
返回适当的滞后和迭代差值。
其中 lag = 1 序列中要计算差值的两个数值之间的距离，
而参数 differences 表示计算差值的次数。
> (x <- cumsum(cumsum(1:10))) #生成一个累加的序列
[1] 1 4 10 20 35 56 84 120 165 220
> diff(x)
[1] 3 6 10 15 21 28 36 45 55
# 相当于4-1、10-4、20-10、…… 200-165
> diff(x, lag = 2)
[1] 9 16 25 36 49 64 81 100
# 间隔一位相减，相当于10-1、20-4、35-10…… 220-120
> diff(x, lag = 2, differences = 2)
[1] 16 20 24 28 32 36
# 进行了两次间隔的减法运算：25-9、36-16、…… 100-64
2.range()函数
Range返回一个包含所有给定参数的最小值和最大值的向量。
> range01 <- function(x){
+ rng <- range(x, na.rm = TRUE)
+ (x - rng[1] / rng[2] - rng[1])
+ }
> range(c(1, 8, 12, 20))
[1] 1 20
> range(c(1, 8, 12, 20))[1]
[1] 1
> range(c(1, 8, 12, 20))[2]
[1] 20
> range01(c(1, 8, 12, 20))
[1] -0.05 6.95 10.95 18.95
这里返回的结果有点让我摸不着头脑，待明白后再续……
