Question

我有一个XTS对象。我想将其转换为TS对象。 TS对象应从XTS对象的起始处获取起始参数值。我不确定该怎么做。

注意-我创建了一个我通过rpy2 python库调用的R函数。我相信这无关紧要，但我还是想提。

我每10分钟进行一次观察，每季一次。因此，频率设置为144（1小时* 24小时内观察6次）。

function(r_dataframe){
         str(r_dataframe)
         library(xts)
         library(forecast)
         r_xts<-as.xts(r_dataframe, frequency = 144)
         str(r_xts)
         r_ts = ts(as.numeric(r_xts), frequency = 144) 
         str(r_ts)
         fitted_model<-HoltWinters(r_ts)
         forecasted_data<-forecast(fitted_model,h=1)
         print(forecasted_data)
         }

以上代码中使用的变量值（通过代码打印）

r_dataframe:
'data.frame':   484 obs. of  1 variable:
 $ value: num  182 186 185 183 191 188 187 183 184 187 ...

r_xts:
An 'xts' object on 2019-07-04 20:56:00/2019-07-08 05:26:00 containing:
  Data: num [1:484, 1] 182 186 185 183 191 188 187 183 184 187 ...
 - attr(*, "dimnames")=List of 2
  ..$ : NULL
  ..$ : chr "value"
  Indexed by objects of class: [POSIXct,POSIXt] TZ:
  xts Attributes:
 NULL

r_ts:
Time-Series [1:484] from 1 to 4.35: 182 186 185 183 191 188 187 183 184 187 ...
Time Series:
Start = c(1, 1)
End = c(4, 52)
Frequency = 144

forecasted_data-实际

     Point Forecast    Lo 80    Hi 80    Lo 95    Hi 95
     4.381944       193.1769 191.4629 194.8909 190.5555 195.7983

forecasted_data-预期

     Point Forecast    Lo 80    Hi 80    Lo 95    Hi 95
     2019-07-08 05:36:00       193.1769 191.4629 194.8909 190.5555 195.7983

R-XTS到TS-如何指定开始时间和结束时间？

0 个答案: