2011-09-03 27 views
8

我有以下的時間序列na.locf但不這樣做結尾港定居

> 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 

我不想結轉最後觀察除了最後一個非缺失值..即不會被替換後港定居。非常感謝你的幫助!

回答

7

使用na.approx從動物園包(其由XTS自動加載):

na.approx(y, method = "constant", na.rm = FALSE) 
相關問題