滞后不按预期工作

Man*_*oon 7 r

lag 没有像我预期的那样工作

a<-c(0,1,2,3,4,5,6,7,8)
a
## [1] 0 1 2 3 4 5 6 7 8
lag(a,k=1)
## [1] 0 1 2 3 4 5 6 7 8
## attr(,"tsp")
## [1] 0 8 1
Run Code Online (Sandbox Code Playgroud)

我以为我会得到:

0 0 1 2 3 4 5 6 7 
Run Code Online (Sandbox Code Playgroud)

要么

1 2 3 4 5 6 7 8 0
Run Code Online (Sandbox Code Playgroud)

我究竟做错了什么?

Sve*_*ein 9

你应该LagHmisc包中使用:

library(Hmisc)
Lag(c(0,1,2,3,4,5,6,7,8), shift = 1)
# [1] NA  0  1  2  3  4  5  6  7
Run Code Online (Sandbox Code Playgroud)