我通过从RasterBrick中提取时间序列来创建一个zoo对象:
library(zoo)
s <- RasterBrick
target_cell <- 23265
ss <- zooExtract(s, target_cell)
windows()
plot.zoo(ss, type = "o")
我的结果如下所示。我想要一条线来完成所有要点,但我似乎无法使其发挥作用,我已经查看过这些问题的先前答案。我尝试了lines()
并且它给出了相同的结果。
答案 0 :(得分:1)
正如@Richard Telford所说,情节中的差距是由于缺少数据。
基础函数complete.cases
和na.locf
来自zoo
的差距
可以删除或填写先前的观察结果如下:
#to identity periods with missing data
missingPeriod = as.Date(index(ss[!complete.cases(ss),]))
#to retain only periods with no missing data
ssComplete = ss[complete.cases(ss),]
#to retain all periods with gaps filled with previous value
#maxgap parameter controls number of missing data replaced with prev observation
N = 5
ssFilled = zoo::na.locf(ss,maxgap=N);
#plots
plot.zoo(ssComplete , type = "o")
plot.zoo(ssFilled, type = "o")