2016-01-22 73 views
0

這是處理:我有一個數據框有14列和20行。我想對每個列應用預測函數,並追加11個與每列對應的行。最好的辦法是什麼?使用時間序列和預測函數的R函數

換句話說,20 * 14數據幀變成31 * 14數據幀。

這是我希望應用功能:

time_series <- ts(summary, frequency=7, start=c(1,1) 
for(i in 1:ncol(time_series)) 
{ 
    forecast(time_series[,i],11) 
} 

原始數據幀是:總結

請這方面的幫助。我可以手動迭代並做到這一點,但我想更有效地做到這一點。

回答

0

你可以試試平常sapply

new.df<-rbind(time_series, sapply(time_series, function(x){ forecast(x,11)$mean })) 
    new.time_series <- ts(new.df, frequency=7, start=c(1,1))