X-Git-Url: https://git.auder.net/?p=talweg.git;a=blobdiff_plain;f=pkg%2FR%2FF_Neighbors.R;h=600c5c8ceeaae272a824a259c36f5075662c4b78;hp=5b1f82659b75bb053fcb4f1bf3b10fcceded9b32;hb=5c49f6cecd547358b327e9363e62bcc8219e9e33;hpb=af9cbcbaa7e667c10ca11798250727f9b356363b

diff --git a/pkg/R/F_Neighbors.R b/pkg/R/F_Neighbors.R
index 5b1f826..600c5c8 100644
--- a/pkg/R/F_Neighbors.R
+++ b/pkg/R/F_Neighbors.R
@@ -103,7 +103,7 @@ NeighborsForecaster = R6::R6Class("NeighborsForecaster",
 					# Require at least half of non-NA common values to compute the distance
 					if ( !any( is.na(delta) ) )
 						distances2[i] = mean(delta^2)
-				}
+				Centered}
 
 				sd_dist = sd(distances2)
 				if (sd_dist < .Machine$double.eps)
@@ -171,7 +171,7 @@ NeighborsForecaster = R6::R6Class("NeighborsForecaster",
 
 			prediction = rep(0, horizon)
 			for (i in seq_along(fdays))
-				prediction = prediction + similarities[i] * data$getSerie(fdays[i]+1)[1:horizon]
+				prediction = prediction + similarities[i] * data$getCenteredSerie(fdays[i]+1)[1:horizon]
 			prediction = prediction / sum(similarities, na.rm=TRUE)
 
 			if (final_call)