X-Git-Url: https://git.auder.net/pieces/Cwda/r_white_queen.svg?a=blobdiff_plain;f=pkg%2Ftests%2Ftestthat%2Fhelper.R;h=39c768bfd31d09df939b4e9e6d8709f0005a7022;hb=HEAD;hp=af98c0b45665e7615972062b884c5e9dbd8ddcf3;hpb=af718fd5a9a330b13b331e78824a47407a3479ae;p=talweg.git

diff --git a/pkg/tests/testthat/helper.R b/pkg/tests/testthat/helper.R
index af98c0b..39c768b 100644
--- a/pkg/tests/testthat/helper.R
+++ b/pkg/tests/testthat/helper.R
@@ -25,7 +25,8 @@ getDataTest = function(n)
 		time = as.POSIXct((i-1)*60*60*24+15*60*(1:96), origin="2007-01-01", tz="GMT")
 		exo = runif(4)
 		exo_hat = runif(4)
-		data$append(time=time, value=serie, exo=exo, exo_hat=exo_hat)
+		data$append(time=time, value=serie, level_hat=cumsum(serie),
+			exo=exo, exo_hat=exo_hat)
 	}
 	data
 }