Commit 4ee024ad authored by Delaigue Olivier's avatar Delaigue Olivier
Browse files

fix: keep original colnames in the data.frame returned by SeriesAggreg.data.frame

Refs #133
parent ed28715c
Pipeline #24994 passed with stage
in 8 minutes and 5 seconds
......@@ -184,6 +184,7 @@ SeriesAggreg.data.frame <- function(x,
all.y = FALSE)
tsAggreg <- tsAggreg[tsAggreg$Selec & tsAggreg$DatesRini, ]
tsAggreg <- tsAggreg[, colnames(TabSeries0)]
colnames(tsAggreg)[1L] <- colnames(x)[1L]
return(tsAggreg)
}
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment