R中的STL分解

Question

我有一个时间序列数据，我正在进行异常处理 为了分解我正在使用STL函数。我想以给定的格式生成输出：

ID Actual Trend Seasonality Random Smooth

请帮我以这种格式生成输出。

Answer 1

不确定ID是什么，但这会创建一个包含实际时间序列和分解的数据框。

x <- stl(nottem, "per")
y <- data.frame(nottem, x$time.series)
head(y)

  nottem  seasonal    trend remainder
1   40.6 -9.347198 49.68067 0.2665254
2   40.8 -9.855250 49.54552 1.1097288
3   44.4 -6.853301 49.41037 1.8429318
4   46.7 -2.763471 49.32862 0.1348488
5   54.1  3.501357 49.24688 1.3517676
6   58.5  8.983303 49.21027 0.3064259