diff --git a/R/get_result.R b/R/get_result.R
index c28375fbfeb047dc004fbb768deaac92d762c6cd..b30db786a4582a72854bd3d7c9a85c92f781e869 100644
--- a/R/get_result.R
+++ b/R/get_result.R
@@ -49,6 +49,7 @@ get_result <- function(cfg,
   time_prms <- sapply(attrs, function(attr) {
     as.numeric(xml_attr(x_res, attr))
   })
+
   tms <- seq(from = time_prms["TpsDebut"],
              to = time_prms["TpsFin"],
              by = time_prms["TpsPas"] * time_prms["TpsSauv"])
@@ -69,7 +70,7 @@ get_result <- function(cfg,
                      paste(cols, collapse = "|")
                    })
 
-  m <- cbind(tms, m)
+  m <- cbind(tms, m[1:length(tms), ])
   colnames(m) <- c("t", column_names)
   class(m) <- c("SicResult", class(m))