时间序列
- 动态滞后模型,加载 dynlm 包。
例如 AR(6) 模型 ↓
library(dynlm)
dynlm(dInfl ~ L(dInfl, 1:6), start = c(1963, 1), end = c(2012, 4))
- 生成工作日时间序列,加载 zoo 包。
library(zoo)
Days <- seq(from = as.Date("2018-1-1"), to = as.Date("2018-7-1"), by = "day")
Weeks <- Days[format(Days, "%w") %in% 1:5] # 周一至周五
Weekend <- Days[format(Days, "%w") %in% c(0, 6)] # 周日和周六
查询星期几,用 weekdays 函数 ↓
weekdays(Weeks)
weekdays(Weekend)