修改dplyr :: lag函数

Question

我正在尝试使用包中的lag函数dplyr.但是,当我给出滞后> 0时,我希望将缺失的值替换为第一个值x.我们怎样才能做到这一点

library(dplyr)
x<-c(1,2,3,4)
z<-lag(x,2)
z
## [1] NA NA  1  2

Answer 1

由于您正在使用该lag函数dplyr,因此存在一个参数default.所以你可以指定你想x[1]成为default.

lag(x, 2, default=x[1])