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

chore: translation updates
Some checks are pending
pkgdown.yaml / pkgdown (push) Waiting to run
Details

Browse source
This commit is contained in:
Andreas Gammelgaard Damsbo 2025-09-10 14:56:43 +02:00
commit 013fc19d04
No known key found for this signature in database
6 changed files with 83 additions and 73 deletions
Download patch file Download diff file Expand all files Collapse all files

12
R/ui_elements.R
View file

@ -131,7 +131,7 @@ ui_elements <- function(selection) {
format = shinyWidgets::wNumbFormat(decimals = 0),
color = datamods:::get_primary_color()
),
shiny::helpText(i18n$t("Only include variables missing less observations than the specified percentage. At 0, only complete variables are included; at 100, all variables are included.")),
shiny::helpText(i18n$t("At 0, only complete variables are included; at 100, all variables are included.")),
shiny::br()
),
shiny::column(
@ -167,7 +167,7 @@ ui_elements <- function(selection) {
#########
##############################################################################
"prepare" = bslib::nav_menu(
title = "Prepare",
title = i18n$t("Prepare"),
icon = shiny::icon("pen-to-square"),
value = "nav_prepare",
bslib::nav_panel(
@ -337,7 +337,7 @@ ui_elements <- function(selection) {
##############################################################################
"describe" =
bslib::nav_menu(
title = "Evaluate",
title = i18n$t("Evaluate"),
icon = shiny::icon("magnifying-glass-chart"),
value = "nav_describe",
# id = "navdescribe",
@ -451,7 +451,7 @@ ui_elements <- function(selection) {
bslib::nav_panel,
c(
list(
title = "Visuals",
title = i18n$t("Visuals"),
icon = shiny::icon("chart-line"),
value = "nav_visuals"
),
@ -472,7 +472,7 @@ ui_elements <- function(selection) {
##############################################################################
"analyze" =
bslib::nav_panel(
title = "Regression",
title = i18n$t("Regression"),
icon = shiny::icon("calculator"),
value = "nav_analyses",
do.call(
@ -487,7 +487,7 @@ ui_elements <- function(selection) {
##############################################################################
"download" =
bslib::nav_panel(
title = "Download",
title = i18n$t("Download"),
icon = shiny::icon("download"),
value = "nav_download",
shiny::fluidRow(