diff --git a/inst/apps/data_analysis_modules/server.R b/inst/apps/data_analysis_modules/server.R index 623e64f..884a82c 100644 --- a/inst/apps/data_analysis_modules/server.R +++ b/inst/apps/data_analysis_modules/server.R @@ -162,7 +162,9 @@ server <- function(input, output, session) { ############################################################################## shiny::observeEvent(rv$data_original, { - rv$data <- rv$data_original |> default_parsing() + rv$data <- rv$data_original |> + default_parsing() |> + janitor::clean_names() }) shiny::observeEvent(input$data_reset, { @@ -543,8 +545,8 @@ server <- function(input, output, session) { } })() - gtsummary::as_kable(rv$list$table1) |> - readr::write_lines(file="./www/_table1.md") + # gtsummary::as_kable(rv$list$table1) |> + # readr::write_lines(file="./www/_table1.md") } )