Read test data as tibble

SAFEHR-data · Aug 23, 2024 · f7caf0e · f7caf0e
1 parent c797006
commit f7caf0e
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/R/utils_get_data.R b/R/utils_get_data.R
@@ -6,7 +6,7 @@
 get_concepts_table <- function() {
   if (golem::app_dev()) {
     return(
-      read.csv(app_sys("test_data", "calypso_concepts.csv"))
+      readr::read_csv(app_sys("test_data", "calypso_concepts.csv"), show_col_types = FALSE)
     )
   }
 
@@ -18,7 +18,7 @@ get_concepts_table <- function() {
 get_monthly_counts <- function() {
   if (golem::app_dev()) {
     return(
-      read.csv(app_sys("test_data", "calypso_monthly_counts.csv"))
+      readr::read_csv(app_sys("test_data", "calypso_monthly_counts.csv"), show_col_types = FALSE)
     )
   }
 
@@ -30,7 +30,7 @@ get_monthly_counts <- function() {
 get_summary_stats <- function() {
   if (golem::app_dev()) {
     return(
-      read.csv(app_sys("test_data", "calypso_summary_stats.csv"))
+      readr::read_csv(app_sys("test_data", "calypso_summary_stats.csv"), show_col_types = FALSE)
     )
   }