我想创建一个滞后向量,但挑战是要重复一些观察。让我们考虑以下向量:
date <- c("2016-04-11", "2016-04-11", "2016-04-11", "2015-05-11", "2015-05-11", "2014-05-11")
前三个元素在同一时间点(最后一个项目)被观察到,第四和第五个(最后一个倒数第二个项目)在同一时间观察,第六个在另一个时间被观察到(第一个顺序,仅由一个项目组成) 。
滞后向量应如下所示:
date <- c("2015-05-11", "2015-05-11", "2015-05-11", "2014-05-11", "2014-05-11", NA)
有没有简单的方法来创建此滞后日期向量?
游程编码数据:
date <- c("2016-04-11", "2016-04-11", "2016-04-11", "2015-05-11", "2015-05-11", "2014-05-11")
res <- rle(date)
res$values <- c(res$values[-1], NA)
res <- inverse.rle(res)
#[1] "2015-05-11" "2015-05-11" "2015-05-11" "2014-05-11" "2014-05-11" NA
本文收集自互联网,转载请注明来源。
如有侵权,请联系 [email protected] 删除。
我来说两句