如何使用windows（）函数提取时间序列的子集？

Question

我使用窗口函数来提取时间序列的子集。但它有时无法正常运作。示例如下所示。有什么建议吗？

library(Mcomp)
monthly_m1 <- subset(M1, "monthly")
x <- monthly_m1[[150]]$xx
endx <- end(x)
window(x, end=c(endx[1],endx[2]-17)) # gives the first observation in x

但是以下没有工作

monthly_m1 <- subset(M1, "monthly")
y <- monthly_m1[[171]]$xx
endy <- end(y)
window(y, end=c(endy[1],endy[2]-17)) # does not give the first observation in y

Answer 1

如果您只想在每个观察中进行第一次观察，请使用

subset(x, end=1)
subset(y, end=1)

使用带负结束值的window似乎有问题，可能是由于时间的一些舍入问题。