X-Git-Url: https://git.auder.net/?a=blobdiff_plain;f=pkg%2FR%2FData.R;h=d4609f20082f0939f3cdd5128381240a6c5de683;hb=1e20780ee1505fac6c7ed68d340892c497524561;hp=9b7db3f766c4cdc07e2c3a95882ce34342920f34;hpb=469529710f56c790ae932b45d13fed2e34bcabf2;p=talweg.git

diff --git a/pkg/R/Data.R b/pkg/R/Data.R
index 9b7db3f..d4609f2 100644
--- a/pkg/R/Data.R
+++ b/pkg/R/Data.R
@@ -44,54 +44,54 @@ Data = setRefClass(
 			else
 				L1
 		},
-		append = function(new_time, new_serie, new_level, new_exo_hat, new_exo_Dm1)
+		append = function(new_time, new_serie, new_level, new_exo_hat, new_exo)
 		{
-			"Acquire a new vector of lists (time, serie, level, exo_hat, exo_Dm1)"
+			"Acquire a new vector of lists (time, serie, level, exo_hat, exo)"
 
 			data[[length(data)+1]] <<- list("time"=new_time,"serie"=new_serie,"level"=new_level,
-				"exo_hat"=new_exo_hat,"exo_Dm1"=new_exo_Dm1)
+				"exo_hat"=new_exo_hat,"exo"=new_exo)
 		},
 		getTime = function(index)
 		{
-			"Get time values at specified index"
+			"Time values at specified index"
 
 			index = dateIndexToInteger(index, .self)
 			data[[index]]$time
 		},
 		getCenteredSerie = function(index)
 		{
-			"Get serie values (centered) at specified index"
+			"Serie values (centered) at specified index"
 
 			index = dateIndexToInteger(index, .self)
 			data[[index]]$serie
 		},
 		getLevel = function(index)
 		{
-			"Get level for the serie at specified index"
+			"Level of the serie at specified index"
 
 			index = dateIndexToInteger(index, .self)
 			data[[index]]$level
 		},
 		getSerie = function(index)
 		{
-			"Get serie values (centered+level) at specified index"
+			"Serie values (centered+level) at specified index"
 
 			index = dateIndexToInteger(index, .self)
 			data[[index]]$serie + data[[index]]$level
 		},
 		getExoHat = function(index)
 		{
-			"Get exogeous predictions at specified index"
+			"Exogeous predictions at specified index"
 
 			index = dateIndexToInteger(index, .self)
 			data[[index]]$exo_hat
 		},
-		getExoDm1 = function(index)
+		getExo = function(index)
 		{
-			"Get exogenous measures the day before specified index"
+			"Exogenous measures at specified index"
 
 			index = dateIndexToInteger(index, .self)
-			data[[index]]$exo_Dm1
+			data[[index]]$exo
 		}
 	)
 )