powered by
Hmisc::Lag
ecd.lag(x, shift = 1, na.omit = FALSE)
x <- ecd.lag(c(1,2,3)) y <- ecd.lag(ecd.mpfr(c(1,2,3)))
Run the code above in your browser using DataLab