2017-06-07 6 views
0

私はこのデータをholt-winterモデルの時系列にすることにいくつか問題があります。私は次に何をすべきかわからない。このデータをRで時系列にするにはどうすればよいですか?

library(reshape) 
library(tidyr) 

tempdata = as.matrix(read.table("https://d37djvu3ytnwxt.cloudfront.net/assets/courseware/v1/592f3be3e90d2bdfe6a69f62374a1250/asset-v1:[email protected]+block/temps.txt", header = TRUE, row.names = 1)) 

#melt data for time series 

tempdata.ts <- melt(tempdata, id=1:1) 

#concatenate Date and Year 

tempdata.ts <- tempdata.ts %>% unite(col = "Date", c(X1, X2)) 

答えて

0

私はあなたがstatsからHoltWintersに合うようにしたいとします。この関数には、tsオブジェクトが必要です。

file <- "https://d37djvu3ytnwxt.cloudfront.net/assets/courseware/v1/592f3be3e90d2bdfe6a69f62374a1250/asset-v1:[email protected]+block/temps.txt" 

read.table(file, header = TRUE, row.names = 1) %>% 
as.data.frame() %>% 
mutate(DayMonth = rownames(.)) %>% 
gather(Date, Value, -DayMonth) %>% 
unite("Date", c(DayMonth, Date)) %>% 
mutate(Date = dmy(Date)) -> tempData 

時系列オブジェクトを作成します:

library(dplyr) 
library(tidyr) 
library(lubridate) 

まず、データを再構築

tsData <- as.ts(
tempData$Value, start = min(tempData$Date), end = max(tempData$Date), 
frequency = 365) 
関連する問題