X-Git-Url: https://git.auder.net/?p=talweg.git;a=blobdiff_plain;f=pkg%2FR%2FgetData.R;fp=pkg%2FR%2FgetData.R;h=8e44a52f3a095b7bc220a4db3de2db64e3fad0f3;hp=d0e69d73daaf374c2e655d9b82df7de5090aaa56;hb=a3344f7591f6f4b3d337a69e4a568e9b16e33415;hpb=0730374e2981d7b950dced9f667713865b44b390

diff --git a/pkg/R/getData.R b/pkg/R/getData.R
index d0e69d7..8e44a52 100644
--- a/pkg/R/getData.R
+++ b/pkg/R/getData.R
@@ -68,7 +68,7 @@ getData = function(ts_data, exo_data, date_format="%d/%m/%Y %H:%M", limit=Inf)
 			{
 				time = c(time, ts_df[line,1])
 				serie = c(serie, ts_df[line,2])
-				level_hat = c(level_hat, #in case of data file is incomplete...
+				level_hat = c(level_hat, #if data file is incomplete...
 					ifelse(ncol(ts_df) > 2, ts_df[line,3], mean(serie,na.rm=TRUE)))
 				line = line + 1
 			};