Question

您好我正在创建一个R时间序列，但在建模之后，我需要将列转换回我可以实际解释的日期（yyyy-mm-dd）。

DateTime

我尝试过使用lubridate中的一些功能（当我有2015.123,2015.456等日常数据时这个功能）但是没有工作......我在这里缺少什么？我怎样才能得到日期？

bus_date <- as.Date(c('2017-04-01', '2017-04-08', '2017-04-15', '2017-04-22', '2017-04-29'))
sales <- c(100, 110, 110, 130, 120)

sales_data <- data.frame(bus_date, sales)

sales_data.ts <- ts(sales_data$sales, 
                       start = min(sales_data$bus_date),
                       freq = (365.25/7))
sales_data.ts

Answer 1

您使用的频率可能不适合您的数据。试试这个

sales_data.ts <- ts(sales_data$sales, 
                    start = min(sales_data$bus_date),
                    frequency = 1/7) #OR deltat = 7
sales_data.ts
#Time Series:
#Start = 17257 
#End = 17285 
#Frequency = 0.142857142857143 
#[1] 100 110 110 130 120

as.Date(as.numeric(time(sales_data.ts)))
#[1] "2017-04-01" "2017-04-08" "2017-04-15" "2017-04-22" "2017-04-29"

将时间序列值转换回日期R.

1 个答案: