0
我想寫一個簡單的代碼來理解動物園包,但我總是有窗口函數的問題。每次我打電話時,無論是使用我的數據還是隨機生成的數據,我都會得到「無觀察值」的值。窗口總是返回沒有意見
這裏是我想要使用的代碼:
upper.bound <- as.Date(paste("01", "06", "2013", sep="-"), format="%d-%m-%Y")
lower.bound <- as.Date(paste("30", "09", "2013", sep="-"), format="%d-%m-%Y")
all_dates <- seq(as.Date(upper.bound), as.Date(lower.bound), by="day")
Z <-zoo(rnorm(200), order.by=all_dates)
x <- window(Z, upper.bound, lower.bound)