Commit cd4c08d4 authored by Delaigue Olivier's avatar Delaigue Olivier
Browse files

fix(GUI): automatically rename the date column of ObsDF

Refs #38
parent 0be4a932
Pipeline #23748 passed with stage
in 2 minutes and 39 seconds
...@@ -21,6 +21,7 @@ ShinyGR <- function(ObsDF = NULL, DatesR = NULL, Precip = NULL, PotEvap = NULL, ...@@ -21,6 +21,7 @@ ShinyGR <- function(ObsDF = NULL, DatesR = NULL, Precip = NULL, PotEvap = NULL,
} }
} }
if (is.data.frame(ObsDF)) { if (is.data.frame(ObsDF)) {
colnames(ObsDF)[1L] <- "DatesR"
ObsDF <- list(ObsDF) ObsDF <- list(ObsDF)
} }
......
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