预测和分解时间序列数据（小时）Forecast and STL hourly time series data

最新推荐文章于 2024-05-22 15:39:24 发布

RoQuant

最新推荐文章于 2024-05-22 15:39:24 发布

阅读量3.2k

点赞数

分类专栏：时间序列 R

R 同时被 2 个专栏收录

421 篇文章 15 订阅

订阅专栏

时间序列

19 篇文章 1 订阅

订阅专栏

d0 <- as.POSIXct(
  "2014-01-01 00:00:00",
  format="%Y-%m-%d %H:%M:%S",
  tz="America/New_York")
##
dWeek <- d0 + seq(
  from=0,
  to=(3600*167),
  by=3600
)
##
set.seed(1234)
x <- rnorm(168,50,5)
tsData <- data.frame(
  Time = dWeek,
  Value=x,
  stringsAsFactors=FALSE)
x.ts <- ts(
  tsData$Value,
  frequency=24,
  start=1)
##
fit <- stl(x.ts,s.window="periodic")
plot(fit)