clean variable names with janitor::clean_names()

This commit is contained in:
Andreas Gammelgaard Damsbo 2025-01-24 11:25:54 +01:00
parent 027a2797a4
commit e0ce910393
No known key found for this signature in database

View file

@ -162,7 +162,9 @@ server <- function(input, output, session) {
############################################################################## ##############################################################################
shiny::observeEvent(rv$data_original, { 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, { shiny::observeEvent(input$data_reset, {
@ -543,8 +545,8 @@ server <- function(input, output, session) {
} }
})() })()
gtsummary::as_kable(rv$list$table1) |> # gtsummary::as_kable(rv$list$table1) |>
readr::write_lines(file="./www/_table1.md") # readr::write_lines(file="./www/_table1.md")
} }
) )