andreas/FreesearchR
1
0
Fork 0
mirror of https://github.com/agdamsbo/FreesearchR.git synced 2026-06-19 04:27:30 +02:00
Code Issues Projects Releases Packages Wiki Activity

ready for new version

Browse source
This commit is contained in:
Andreas Gammelgaard Damsbo 2026-02-23 16:51:24 +01:00
commit 16e3e5eb28
No known key found for this signature in database
4 changed files with 18 additions and 14 deletions
Download patch file Download diff file Expand all files Collapse all files

10
app_docker/app.R
View file

@ -1,7 +1,7 @@
########
#### Current file: /var/folders/9l/xbc19wxx0g79jdd2sf_0v291mhwh7f/T//Rtmpp0JgLn/file73e1594116cf.R
#### Current file: /var/folders/9l/xbc19wxx0g79jdd2sf_0v291mhwh7f/T//Rtmpp0JgLn/file73e17b926733.R
########
i18n_path <- here::here("translations")
@ -6205,18 +6205,16 @@ data_missings_server <- function(id, data, max_level = 20, ...) {
}
} else {
## Due to reactivity, the table updates too quickly. this mitigates that issue..
if (input$missings_var == "predictors") {
if (input$missings_method == "predictors") {
title <- glue::glue(
i18n$t(
"Missings across variables by the variable **'{input$missings_var}'**"
"Missing observations across variables grouped by **'{input$missings_var}'**"
)
)
} else {
title <- glue::glue(
i18n$t(
"Missing vs non-missing observations in the variable **'{input$missings_var}'**"
"Differences by missing vs non-missing observations in **'{input$missings_var}'**"
)
)
}