diff --git a/DESCRIPTION b/DESCRIPTION
index a9ceaeefb9426d782c24cacf2ff1ed681e784e64..85dc466adf9fab9b895c418abc2e797b91176b9d 100644
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -1,7 +1,7 @@
 Package: airGR
 Type: Package
 Title: Suite of GR Hydrological Models for Precipitation-Runoff Modelling
-Version: 1.0.6.6
+Version: 1.0.6.7
 Date: 2017-04-05
 Authors@R: c(
   person("Laurent", "Coron", role = c("aut", "trl")),
diff --git a/R/DataAltiExtrapolation_Valery.R b/R/DataAltiExtrapolation_Valery.R
index a3f05c96764a832957206b31e7897b9a113d3176..f6629f2eb60fc027a9e647d73dcfa394cc22a8fd 100644
--- a/R/DataAltiExtrapolation_Valery.R
+++ b/R/DataAltiExtrapolation_Valery.R
@@ -450,10 +450,10 @@ DataAltiExtrapolation_Valery <- function(DatesR,
         return(prcp)
       })
       if (PrecipScale) {
-        LayerPrecip_df <- LayerPrecip_df / rowMeans(LayerPrecip_df) * Precip
-        LayerPrecip_df[is.nan(LayerPrecip_df)] <- 0
+        LayerPrecip_mat <- LayerPrecip_df / rowMeans(LayerPrecip_df) * Precip
+        LayerPrecip_mat[is.nan(LayerPrecip_mat)] <- 0
       }
-      LayerPrecip <- as.list(LayerPrecip_df)
+      LayerPrecip <- as.list(as.data.frame(LayerPrecip_mat))
     }