andreas/FreesearchR
1
0
Fork 0
mirror of https://github.com/agdamsbo/FreesearchR.git synced 2025-09-12 09:59:39 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions 1

clean variable names with janitor::clean_names()

Browse source
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
1 changed files with 5 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
inst/apps/data_analysis_modules/server.R
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")
} }
) )