時系列データを日付に変換するR

Question

こんにちは私はR時系列を作成していますが、モデリング後、実際に解釈できる（yyyy-mm-dd）まで列を元に戻す必要があります。

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 

私はlubridateでの機能の一部を使用してみました（私は2015.123、2015.456などのような毎日のデータを持っていたとき、これは働いていた）が、働いていない....私はここで何をしないのですか？どのように日付を戻すことができますか？

setDT(data_ARIMA, keep.rownames = TRUE)[] 
data_ARIMA$dates_intermediate <- date_decimal(as.numeric(data_ARIMA$rn)) 
data_ARIMA$dates <- as.Date(date_decimal(as.numeric(data_ARIMA$rn))) 
data_ARIMA 

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"