read data model csv as reactive object

Sage-Bionetworks · Aug 22, 2024 · a33bac0 · a33bac0
1 parent d426c31
commit a33bac0
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 1 deletion.
diff --git a/.Rbuildignore b/.Rbuildignore
@@ -1 +1,3 @@
+^renv$
+^renv\.lock$
 ^\.github$
diff --git a/global.R b/global.R
@@ -30,7 +30,7 @@ truncated_values <- JS("
 #' @export
 format_dict_table <- function(data_model_url) {
 
-  data_model <- read.csv(url(data_model_url))
+  data_model <- reactive(read.csv(url(data_model_url)))
 
   col_attribs <- data_model |>
     dplyr::filter(Parent == 'ManifestColumn') |>