save current state

[talweg.git] / pkg / R / getData.R

diff --git a/pkg/R/getData.R b/pkg/R/getData.R
index b095d01..4e2e3fd 100644 (file)
--- a/pkg/R/getData.R
+++ b/pkg/R/getData.R
@@ -85,10 +85,9 @@ getData = function(ts_data, exo_data, input_tz="GMT", date_format="%d/%m/%Y %H:%
                        }
                }
 
-               hat_exo = as.data.frame( exo_df[i,(1+nb_exos+1):(1+2*nb_exos)] )
                exo = as.data.frame( exo_df[i,2:(1+nb_exos)] )
-               data$appendHat(time, hat_exo)
-               data$append(serie, exo) #in realtime, this call comes hours later
+               exo_hat = as.data.frame( exo_df[i,(1+nb_exos+1):(1+2*nb_exos)] )
+               data$append(time, serie, exo, exo_hat)
                if (i >= limit)
                        break
                i = i + 1