利用r

利用r,r,lag,R,Lag,我有一个这样的数据框 MSFT AAPL GOOGL 1 21.11067 4.975767 94.04000 2 20.91273 5.663524 97.50684 3 20.05333 5.681336 90.57909 要创建一个与以前的数据有一个延迟的文件,如 MSFT AAPL GOOGL 1 20.91273 5.663524 97.50684 2 20.05333 5.681336 90.57909 3 20.09447

我有一个这样的数据框

    MSFT     AAPL     GOOGL
1 21.11067 4.975767  94.04000
2 20.91273 5.663524  97.50684
3 20.05333 5.681336  90.57909
要创建一个与以前的数据有一个延迟的文件,如

   MSFT     AAPL     GOOGL
1 20.91273 5.663524  97.50684
2 20.05333 5.681336  90.57909
3 20.09447 5.239416  99.60738
尝试使用此代码来解决此问题

Lagcolmean <- lapply(names(colmean), function(x){lag(colmean[[x]],k=1)
})
Lagcolmean1)索引
lag
通常与时间序列一起使用,如
“ts”
“zoo”
“xts”
对象。对于数据帧,只需删除第一行:

DF[-1, ]
2)rollapplyr如果您想使用问题代码中的
rollapply
,请尝试以下操作:

rollapplyr(DF, 2, function(x) x[2])
或相当于:

rollapplyr(DF, 2, "[", 2)
3)dplyr或者,dplyr包确实定义了与数据帧一起工作的
超前
滞后

library(dplyr)
DF %>% mutate_all(lead)
1)索引
滞后
通常与时间序列一起使用,如
“ts”
“zoo”
“xts”
对象。对于数据帧,只需删除第一行:

DF[-1, ]
2)rollapplyr如果您想使用问题代码中的
rollapply
,请尝试以下操作:

rollapplyr(DF, 2, function(x) x[2])
或相当于:

rollapplyr(DF, 2, "[", 2)
3)dplyr或者,dplyr包确实定义了与数据帧一起工作的
超前
滞后

library(dplyr)
DF %>% mutate_all(lead)