na.locf 但不做尾随 NA

Posted 2023-03-25

【中文标题】na.locf 但不做尾随 NA

【英文标题】：na.locf but don't do trailing NAs

【发布时间】：2011-11-09 21:44:08

【问题描述】：

我有以下时间序列

> y<- xts(1:10, Sys.Date()+1:10)
> y[c(1,2,5,9,10)] <- NA
> y
           [,1]
2011-09-04   NA
2011-09-05   NA
2011-09-06    3
2011-09-07    4
2011-09-08   NA
2011-09-09    6
2011-09-10    7
2011-09-11    8
2011-09-12   NA
2011-09-13   NA

直接 na.locf 给我这个：

> na.locf(y)
           [,1]
2011-09-04   NA
2011-09-05   NA
2011-09-06    3
2011-09-07    4
2011-09-08    4
2011-09-09    6
2011-09-10    7
2011-09-11    8
2011-09-12    8
2011-09-13    8

我如何做到这一点？

           [,1]
2011-09-04   NA
2011-09-05   NA
2011-09-06    3
2011-09-07    4
2011-09-08    4
2011-09-09    6
2011-09-10    7
2011-09-11    8
2011-09-12    NA
2011-09-13    NA

我不希望最后一个观察结果被结转，除了最后一个非缺失值..即不替换尾随 NA。非常感谢您的帮助！

【参考方案1】：

使用 zoo 包中的na.approx（由 xts 自动加载）：

na.approx(y, method = "constant", na.rm = FALSE)