(Hopefully temporary) workaround for tidyverse/vroom#519

OHDSI · Nov 17, 2023 · 23833e7 · 23833e7
1 parent 4c3068b
commit 23833e7
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/R/Table1.R b/R/Table1.R
@@ -31,6 +31,8 @@
 #' @export
 getDefaultTable1Specifications <- function() {
   fileName <- system.file("csv", "Table1Specs.csv", package = "FeatureExtraction")
+  # Workaround for issue https://github.com/tidyverse/vroom/issues/519:
+  readr::local_edition(1)
   colTypes <- list(label = readr::col_character(), analysisId = readr::col_integer(), covariateIds = readr::col_character())
   specifications <- readr::read_csv(fileName, col_types = colTypes)
   return(specifications)