用R导出到csv文件时间序列

时间:2015-10-19 15:03:42

标签: r time-series

我使用auto.arima模型选择进行了时间序列预测,现在我想将结果导出为具有适当索引的数据框(csv文件),如下所示: 日期预测

这是我预测的一个例子:

arimaMod

Forecasts:
      Point Forecast    Lo 80     Hi 80    Lo 95     Hi 95
16375       7237.749 6185.481  8290.017 5628.444  8847.054
16376       7281.550 6107.853  8455.247 5486.536  9076.565
16377       8454.528 7223.022  9686.035 6571.102 10337.955
16378       9185.438 7953.734 10417.143 7301.709 11069.168
16379       9319.427 8073.644 10565.211 7414.166 11224.689
16380       8874.671 7628.500 10120.843 6968.817 10780.526

如何将16375转换为日期{(as.Date(16375)=“2014-11-01”}并获取相应格式的数据框。

提前感谢您的帮助

1 个答案:

答案 0 :(得分:0)

要将数字转换为日期使用:

    as.Date(16375,origin='1970-01-01')
[1] "2014-11-01”

因此在您的情况下假设数据框'df'和日期列'Point'

df$Point <- as.Date(df$Point, origin='1970-01-01’) 

将转换为日期格式,您可以使用Heroka提及的‘write.table’'write.csv’将“df”写入文件。

更新

Max,查看你的评论和'str'函数的结果我可以看到你的数据框中没有可以转换为日期的变量!您应该做的是将row names转换为如下日期:

df$date <- as.Date(as.numeric(rownames(df), origin='1970-01-01'))

这会在数据框中添加一个新列,并将行名称转换为有效日期。

一个更明确的例子:

> df <- data.frame(name=LETTERS[1:3],value=1:3)
> df
  name value
1    A     1
2    B     2
3    C     3

> df$date <- as.Date(as.numeric(rownames(df), origin='1970-01-01'))
> df
  name value       date
1    A     1 1970-01-02
2    B     2 1970-01-03
3    C     3 1970-01-04

希望这能解决你的问题。