fix: fixed wrong headers

This commit is contained in:
Andreas Gammelgaard Damsbo 2026-02-23 16:34:26 +01:00
commit 4b7b1be6b7
No known key found for this signature in database
2 changed files with 6 additions and 6 deletions

View file

@ -1,6 +1,8 @@
# FreesearchR 26.2.2
Minor addition to the previous update with correct activation of the missingness evaluation button.
*FIX* Minor addition to the previous update with correct activation of the missingness evaluation button.
*FIX* Correct table headers for evaluating missings across groups.
# FreesearchR 26.2.1

View file

@ -192,18 +192,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}'**"
)
)
}