在R中为msts（）对象设置滑动窗口

Question

我有一个多季节时间序列对象，可以进行4年的日常观察。

    y.msts <- msts(full.df$y, seasonal.periods=c(7,365.25))

我正在尝试使用以下代码创建用于时间交叉验证的滑动窗口：

    train <- window(y.msts,start = (as.Date(as.character("2014- 
    01-01"))),end=(as.Date(as.character("2015-12-31")))) #2014 and 2015 as training set

但是，我不断收到以下警告消息，随后是错误消息 'end'的值未更改window.default（x，...）中的错误：'start'不能在'之后结束'

有人可以帮助我了解为什么会发生这种情况以及我可以采取什么措施来纠正它吗？