.gitignore

@@ -6,6 +6,7 @@ dev/
 .DS_Store
 .quarto
 app/rsconnect
+inst/shiny-examples/casting/functions.R
 functions.R
 docs
 inst/doc

CITATION.cff

@@ -8,7 +8,7 @@ message: 'To cite package "FreesearchR" in publications use:'
 type: software
 license: AGPL-3.0-or-later
 title: 'FreesearchR: Easy data analysis for clinicians'
-version: 26.3.4
+version: 26.3.2
 doi: 10.5281/zenodo.14527429
 identifiers:
 - type: url

DESCRIPTION

@@ -1,6 +1,6 @@
 Package: FreesearchR
 Title: Easy data analysis for clinicians
-Version: 26.3.4
+Version: 26.3.3
 Authors@R: c(
     person("Andreas Gammelgaard", "Damsbo",email="agdamsbo@clin.au.dk", role = c("aut", "cre"),
            comment = c(ORCID = "0000-0002-7559-1154")),

NEWS.md

@@ -1,14 +1,6 @@
-# FreesearchR 26.3.4
-
-
-
 # FreesearchR 26.3.3
 
-*NEW* option to pass global settings when running as docker or launching from R. Support for INCLUDE_GLOBALENV, DATA_LIMIT_DEFAULT, DATA_LIMIT_UPPER and DATA_LIMIT_LOWER. Described in the README.
-
-*FIX* faster data description function.
-
-Also added a few tests to the package.
+*NEW* option to pass global settings when running as docker or launching from R. Support for INCLUDE_GLOBALENV, DATA_LIMIT_DEFAULT, DATA_LIMIT_UPPER and DATA_LIMIT_LOWER. Docs are missing...
 
 # FreesearchR 26.3.2
 

R/app_version.R

@@ -1 +1 @@
-app_version <- function()'26.3.4'
+app_version <- function()'26.3.2'

R/data-summary.R

@@ -75,7 +75,7 @@ add_sparkline <- function(grid, column = "vals", color.main = "#2a8484", color.s
         type <- "line"
         ds <- data.frame(x = NA, y = NA)
         horizontal <- FALSE
-      } else if ("factor" %in% data_cl) {
+      } else if (identical(data_cl, "factor")) {
         type <- "column"
         s <- summary(data)
         ds <- data.frame(x = names(s), y = s)

R/helpers.R

@@ -219,23 +219,20 @@ file_export <- function(data,
 #'   head(5) |>
 #'   str()
 default_parsing <- function(data) {
-  # name_labels <- lapply(data, \(.x) REDCapCAST::get_attr(.x, attr = "label"))
+  name_labels <- lapply(data, \(.x) REDCapCAST::get_attr(.x, attr = "label"))
   # browser()
-  with_labels(data,{
-    data |>
-      setNames(make.names(names(data), unique = TRUE)) |>
-      ## Temporary step to avoid nested list and crashing
-      remove_nested_list() |>
-      REDCapCAST::parse_data() |>
-      REDCapCAST::as_factor() |>
-      REDCapCAST::numchar2fct(numeric.threshold = 8,
-                              character.throshold = 10) |>
-      REDCapCAST::as_logical() |>
-      REDCapCAST::fct_drop()
-  })
-  # out <-
-  #
-  # set_column_label(out, setNames(name_labels, names(out)), overwrite = FALSE)
+  out <- data |>
+    setNames(make.names(names(data), unique = TRUE)) |>
+    ## Temporary step to avoid nested list and crashing
+    remove_nested_list() |>
+    REDCapCAST::parse_data() |>
+    REDCapCAST::as_factor() |>
+    REDCapCAST::numchar2fct(numeric.threshold = 8,
+                            character.throshold = 10) |>
+    REDCapCAST::as_logical() |>
+    REDCapCAST::fct_drop()
+
+  set_column_label(out, setNames(name_labels, names(out)), overwrite = FALSE)
 
   # purrr::map2(
   #   out,
@@ -359,28 +356,33 @@ missing_fraction <- function(data) {
 #'   sample(c(1:8, NA), 20, TRUE)
 #' ) |> data_description()
 data_description <- function(data, data_text = "Data") {
-  # Resolve reactive once
-  if (shiny::is.reactive(data)) data <- data()
-
-  # Early return if null
-  if (is.null(data)) return(i18n$t("No data present."))
+  data <- if (shiny::is.reactive(data))
+    data()
+  else
+    data
 
   n <- nrow(data)
-
-  # Early return if empty
-  if (n == 0L) return(i18n$t("No data present."))
-
   n_var <- ncol(data)
-
-  # Faster complete.cases alternative using rowSums on NA matrix
-  n_complete <- n - sum(rowSums(is.na(data)) > 0L)
+  n_complete <- sum(complete.cases(data))
   p_complete <- signif(100 * n_complete / n, 3)
 
-  glue::glue(
-    i18n$t(
-      "{data_text} has {n} observations and {n_var} variables, with {n_complete} ({p_complete} %) complete cases."
+  if (is.null(data)) {
+    i18n$t("No data present.")
+  } else {
+    glue::glue(
+      i18n$t(
+        "{data_text} has {n} observations and {n_var} variables, with {n_complete} ({p_complete} %) complete cases."
+      )
     )
-  )
+  }
+  # sprintf(
+  #   "%s has %s observations and %s variables, with %s (%s%%) complete cases.",
+  #   data_text,
+  #   n,
+  #   n_var,
+  #   n_complete,
+  #   p_complete
+  # )
 }
 
 

R/hosted_version.R

@@ -1 +1 @@
-hosted_version <- function()'v26.3.4-260312'
+hosted_version <- function()'v26.3.2-260311'

R/launch_FreesearchR.R

@@ -18,7 +18,7 @@
 #' data(mtcars)
 #' launch_FreesearchR(launch.browser = TRUE)
 #' }
-launch_FreesearchR <- function(include_globalenv = TRUE,
+launch_FreesearchR <- function(inlcude_globalenv = TRUE,
                                data_limit_default = 1000,
                                data_limit_upper = 100000,
                                data_limit_lower = 1,
@@ -43,116 +43,17 @@ launch_FreesearchR <- function(include_globalenv = TRUE,
 
 ## Helper to set env variables
 get_config <- function(var_name, default = NULL) {
-  val <- Sys.getenv(var_name, unset = NA_character_)
+  # First check environment variables (set by Docker)
+  val <- Sys.getenv(var_name, unset = NA)
 
-  # Only use env var if it is explicitly set and non-empty
-  if (!is.na(val) && nzchar(trimws(val))) {
-    if (is.logical(default)) return(to_logical(val))
-    if (is.numeric(default)) return(as.numeric(val))
+  if (!is.na(val) && nzchar(val)) {
     return(val)
   }
 
+  # Fall back to default (can be overridden when launching from R)
   if (!is.null(default)) {
     return(default)
   }
 
   stop(paste("Required config variable not set:", var_name))
 }
-
-to_logical <- function(x) {
-  result <- switch(tolower(trimws(as.character(x))),
-                   "true"  = , "1" = , "yes" = TRUE,
-                   "false" = , "0" = , "no"  = FALSE,
-                   NA
-  )
-  if (is.na(result)) stop(paste("Cannot coerce to logical:", x))
-  result
-}
-
-
-## File loader - based on the module, uses hard coded default values
-load_file <- function(path) {
-  read_fns <- list(
-    ods  = "import_ods",
-    dta  = "import_dta",
-    csv  = "import_delim",
-    tsv  = "import_delim",
-    txt  = "import_delim",
-    xls  = "import_xls",
-    xlsx = "import_xls",
-    rds  = "import_rds"
-  )
-
-  ext <- tolower(tools::file_ext(path))
-
-  if (!ext %in% names(read_fns)) {
-    message("Unsupported file type, skipping: ", basename(path), " (.", ext, ")")
-    return(NULL)
-  }
-
-  read_fn <- read_fns[[ext]]
-
-  parameters <- list(
-    file     = path,
-    sheet    = 1,
-    skip     = 0,
-    dec      = ".",
-    encoding = "unknown"
-  )
-
-  # Trim parameters to only those accepted by the target function
-  parameters <- parameters[which(names(parameters) %in% rlang::fn_fmls_names(get(read_fn)))]
-
-  result <- tryCatch(
-    rlang::exec(read_fn, !!!parameters),
-    error = function(e) {
-      # Fall back to rio::import
-      message("Primary loader failed for ", basename(path), ", trying rio::import")
-      tryCatch(
-        rio::import(path),
-        error = function(e2) {
-          message("Failed to load ", basename(path), ": ", e2$message)
-          NULL
-        }
-      )
-    }
-  )
-
-  if (!is.null(result) && NROW(result) < 1) {
-    message("File loaded but contains no rows, skipping: ", basename(path))
-    return(NULL)
-  }
-
-  result
-}
-
-
-load_folder <- function(folder = "/app/data", envir = .GlobalEnv) {
-  if (is.null(folder) || !dir.exists(folder)) {
-    message("No data folder found, skipping load")
-    return(invisible(NULL))
-  }
-
-  files <- list.files(folder, full.names = TRUE)
-  if (length(files) == 0) {
-    message("Data folder is empty, skipping load")
-    return(invisible(NULL))
-  }
-
-  loaded <- vapply(files, function(file) {
-    result <- load_file(file)
-    if (is.null(result))
-      return(FALSE)
-    name <- tools::file_path_sans_ext(basename(file))
-    assign(name, default_parsing(result), envir = envir)
-    TRUE
-  }, logical(1))
-
-  message(sprintf(
-    "Loaded %d/%d files from %s",
-    sum(loaded),
-    length(files),
-    folder
-  ))
-  invisible(loaded)
-}

README.md

@@ -25,71 +25,45 @@ This app has the following simple goals:
 
 1.   ease quick data overview and basic visualisations for any clinical researcher
 
-Here’s a polished and restructured version of your README section for clarity, conciseness, and user-friendliness:
+## Run locally on your own machine
 
-## Run Locally on Your Own Machine
+The ***FreesearchR*** app can also run on your own machine with no data transmitted anywhere. Blow are the available options.
 
-The **FreesearchR** app can be run locally on your machine, ensuring no data is transmitted externally. Below are the available options for setup and configuration.
+### Run from R (or RStduio)
 
-### Configuration & Data Loading
+Working with data in R, FreesearchR is a quick and easy tool to get overview and perform the first explorative analyses to get you going.
 
-The app can be configured either by passing a named list to `run_app()` or by setting environment variables in a **Docker Compose** file. The following variables control data access and display behavior. If no values are provided, the app will use the defaults listed below.
+Any data available in the your R session will be available to the FreesearchR app. Just follow the below steps to get going:
 
+1.   **Requirement:** You need to have [*R* installed](https://www.r-project.org/) and possibly an editor like [RStudio](https://posit.co/download/rstudio-desktop/). 
 
-**Configuration Variables**
+1.   Then open the *R* console and copy/paste the following code, that will install the `{devtools}` package and then the `{FreesearchR}` *R*-package with its dependencies:
 
-| Variable                | Description                                                                 | Default   |
-|-------------------------|-----------------------------------------------------------------------------|-----------|
-| `INCLUDE_GLOBALENV`     | Load datasets already present in the global R environment into the app    | `FALSE`   |
-| `DATA_LIMIT_DEFAULT`    | Default number of observations for previewing or working with a dataset            | `10,000`  |
-| `DATA_LIMIT_UPPER`      | Maximum number of observations a user can set for the upper limit. If set to 0, no uppper limit is applied.                    | `100,000` |
-| `DATA_LIMIT_LOWER`      | Minimum number of observations a user can set for the lower limit                    | `1`       |
+     ```
+     require("devtools")
+     devtools::install_github("agdamsbo/FreesearchR")
+     library(FreesearchR)
+     # By loading mtcars to the environment, it will be available 
+     # in the interface like any other data.frame
+     data(mtcars) 
+     launch_FreesearchR()
+     ```
 
-### Run from R (or RStudio)
+### Running with docker compose
 
-If you're working with data in R, **FreesearchR** is a quick and easy tool for exploratory analysis.
+For advanced users, wanting to deploy the FreesearchR app to run anywhere, a docker image is available.
 
-1. **Requirement:** Ensure you have [R](https://www.r-project.org/) installed, and optionally an editor like [RStudio](https://posit.co/download/rstudio-desktop/).
+Below is the minimal `docker_compose.yml` file:
 
-2. Open the **R console** and run the following code to install the `{FreesearchR}` package and launch the app:
-
-   ```r
-   if (!require("devtools")) install.packages("devtools")
-   devtools::install_github("agdamsbo/FreesearchR")
-   library(FreesearchR)
-   # Load sample data (e.g., mtcars) to make it available in the app
-   data(mtcars)
-   launch_FreesearchR(INCLUDE_GLOBALENV=TRUE)
-   ```
-
-All the variables specified above can also be passed to the app on launch from R. Set DATA_LIMIT_UPPER=0 to remove upper data limit. This limit is set to protect the online app version from choking and crashing on large data sets.
-
-### Running with Docker Compose
-
-For advanced users, you can deploy **FreesearchR** using Docker. A data folder can be mounted to `/app/data` to automatically load supported file types (`.csv`, `.tsv`, `.txt`, `.xls`, `.xlsx`, `.ods`, `.dta`, `.rds`) at startup.
-
-To mount a local data folder, add a `volumes` entry to your `docker-compose.yml` file:
-
-```yaml
+```
 services:
-  shiny:
+  freesearchr: 
     image: ghcr.io/agdamsbo/freesearchr:latest 
-    volumes:
-      - ./data:/app/data:ro
-    environment:
-      - INCLUDE_GLOBALENV=FALSE
-      - DATA_LIMIT_DEFAULT=10000
-      - DATA_LIMIT_UPPER=100000
-      - DATA_LIMIT_LOWER=1
     ports: 
       - '3838:3838'
     restart: on-failure
 ```
 
-- The `:ro` flag mounts the folder as **read-only**, preventing the app from modifying your original data files.
-
-- If no volume is mounted, the app will start without any preloaded datasets.
-
 ## Code of Conduct
 
 Please note that the ***FreesearchR*** project is published with a [Contributor Code of Conduct](https://contributor-covenant.org/version/2/1/CODE_OF_CONDUCT.html). By contributing to this project, you agree to abide by its terms.

SESSION.md

@@ -11,11 +11,11 @@
 |collate     |en_US.UTF-8                                |
 |ctype       |en_US.UTF-8                                |
 |tz          |Europe/Copenhagen                          |
-|date        |2026-03-12                                 |
+|date        |2026-03-11                                 |
 |rstudio     |2026.01.1+403 Apple Blossom (desktop)      |
 |pandoc      |3.6.4 @ /opt/homebrew/bin/ (via rmarkdown) |
 |quarto      |1.7.30 @ /usr/local/bin/quarto             |
-|FreesearchR |26.3.4.260312                              |
+|FreesearchR |26.3.2.260311                              |
                                                                                 
                                                                                 
 --------------------------------------------------------------------------------
@@ -32,7 +32,8 @@
 |bit               |4.6.0         |2025-03-06 |CRAN (R 4.5.0) |
 |bit64             |4.6.0-1       |2025-01-16 |CRAN (R 4.5.0) |
 |bitops            |1.0-9         |2024-10-03 |CRAN (R 4.5.0) |
-|boot              |1.3-32        |2025-08-29 |CRAN (R 4.5.0) |
+|boot              |1.3-32        |2025-08-29 |CRAN (R 4.5.2) |
+|brio              |1.1.5         |2024-04-24 |CRAN (R 4.5.0) |
 |broom             |1.0.12        |2026-01-27 |CRAN (R 4.5.2) |
 |broom.helpers     |1.22.0        |2025-09-17 |CRAN (R 4.5.0) |
 |bsicons           |0.1.2         |2023-11-04 |CRAN (R 4.5.0) |
@@ -44,11 +45,11 @@
 |caTools           |1.18.3        |2024-09-04 |CRAN (R 4.5.0) |
 |cellranger        |1.1.0         |2016-07-27 |CRAN (R 4.5.0) |
 |checkmate         |2.3.4         |2026-02-03 |CRAN (R 4.5.2) |
-|class             |7.3-23        |2025-01-01 |CRAN (R 4.5.0) |
+|class             |7.3-23        |2025-01-01 |CRAN (R 4.5.2) |
 |classInt          |0.4-11        |2025-01-08 |CRAN (R 4.5.0) |
 |cli               |3.6.5         |2025-04-23 |CRAN (R 4.5.0) |
 |cluster           |2.1.8.2       |2026-02-05 |CRAN (R 4.5.2) |
-|codetools         |0.2-20        |2024-03-31 |CRAN (R 4.5.0) |
+|codetools         |0.2-20        |2024-03-31 |CRAN (R 4.5.2) |
 |colorspace        |2.1-2         |2025-09-22 |CRAN (R 4.5.0) |
 |commonmark        |2.0.0         |2025-07-07 |CRAN (R 4.5.0) |
 |crayon            |1.5.3         |2024-06-20 |CRAN (R 4.5.0) |
@@ -66,7 +67,7 @@
 |e1071             |1.7-17        |2025-12-18 |CRAN (R 4.5.2) |
 |easystats         |0.7.5         |2025-07-11 |CRAN (R 4.5.0) |
 |ellipsis          |0.3.2         |2021-04-29 |CRAN (R 4.5.0) |
-|emmeans           |2.0.2         |2026-03-05 |CRAN (R 4.5.2) |
+|emmeans           |2.0.1         |2025-12-16 |CRAN (R 4.5.2) |
 |esquisse          |2.1.0         |2025-02-21 |CRAN (R 4.5.0) |
 |estimability      |1.5.1         |2024-05-12 |CRAN (R 4.5.0) |
 |eulerr            |7.0.4         |2025-09-24 |CRAN (R 4.5.0) |
@@ -74,23 +75,24 @@
 |farver            |2.1.2         |2024-05-13 |CRAN (R 4.5.0) |
 |fastmap           |1.2.0         |2024-05-15 |CRAN (R 4.5.0) |
 |flextable         |0.9.11        |2026-02-13 |CRAN (R 4.5.2) |
+|fontawesome       |0.5.3         |2024-11-16 |CRAN (R 4.5.0) |
 |fontBitstreamVera |0.1.1         |2017-02-01 |CRAN (R 4.5.0) |
 |fontLiberation    |0.1.0         |2016-10-15 |CRAN (R 4.5.0) |
 |fontquiver        |0.2.1         |2017-02-01 |CRAN (R 4.5.0) |
 |forcats           |1.0.1         |2025-09-25 |CRAN (R 4.5.0) |
 |foreach           |1.5.2         |2022-02-02 |CRAN (R 4.5.0) |
-|foreign           |0.8-91        |2026-01-29 |CRAN (R 4.5.2) |
+|foreign           |0.8-90        |2025-03-31 |CRAN (R 4.5.2) |
 |Formula           |1.2-5         |2023-02-24 |CRAN (R 4.5.0) |
-|FreesearchR       |26.3.4        |NA         |NA             |
-|fs                |1.6.7         |2026-03-06 |CRAN (R 4.5.2) |
+|FreesearchR       |26.3.2        |NA         |NA             |
+|fs                |1.6.6         |2025-04-12 |CRAN (R 4.5.0) |
 |gdtools           |0.5.0         |2026-02-09 |CRAN (R 4.5.2) |
 |generics          |0.1.4         |2025-05-09 |CRAN (R 4.5.0) |
-|ggalluvial        |0.12.6        |2026-02-22 |CRAN (R 4.5.2) |
+|ggalluvial        |0.12.5        |2023-02-22 |CRAN (R 4.5.0) |
 |ggcorrplot        |0.1.4.1       |2023-09-05 |CRAN (R 4.5.0) |
 |ggforce           |0.5.0         |2025-06-18 |CRAN (R 4.5.0) |
 |ggplot2           |4.0.2         |2026-02-03 |CRAN (R 4.5.2) |
 |ggridges          |0.5.7         |2025-08-27 |CRAN (R 4.5.0) |
-|ggstats           |0.13.0        |2026-03-06 |CRAN (R 4.5.2) |
+|ggstats           |0.12.0        |2025-12-22 |CRAN (R 4.5.2) |
 |glue              |1.8.0         |2024-09-30 |CRAN (R 4.5.0) |
 |gridExtra         |2.3           |2017-09-09 |CRAN (R 4.5.0) |
 |gt                |1.3.0         |2026-01-22 |CRAN (R 4.5.2) |
@@ -109,29 +111,29 @@
 |iterators         |1.0.14        |2022-02-05 |CRAN (R 4.5.0) |
 |jquerylib         |0.1.4         |2021-04-26 |CRAN (R 4.5.0) |
 |jsonlite          |2.0.0         |2025-03-27 |CRAN (R 4.5.0) |
-|KernSmooth        |2.23-26       |2025-01-01 |CRAN (R 4.5.0) |
+|KernSmooth        |2.23-26       |2025-01-01 |CRAN (R 4.5.2) |
 |keyring           |1.4.1         |2025-06-15 |CRAN (R 4.5.0) |
 |knitr             |1.51          |2025-12-20 |CRAN (R 4.5.2) |
-|later             |1.4.8         |2026-03-05 |CRAN (R 4.5.2) |
+|later             |1.4.6         |2026-02-13 |CRAN (R 4.5.2) |
 |lattice           |0.22-7        |2025-04-02 |CRAN (R 4.5.2) |
 |lifecycle         |1.0.5         |2026-01-08 |CRAN (R 4.5.2) |
-|lme4              |2.0-1         |2026-03-05 |CRAN (R 4.5.2) |
+|lme4              |1.1-38        |2025-12-02 |CRAN (R 4.5.2) |
 |lubridate         |1.9.5         |2026-02-04 |CRAN (R 4.5.2) |
 |magrittr          |2.0.4         |2025-09-12 |CRAN (R 4.5.0) |
 |MASS              |7.3-65        |2025-02-28 |CRAN (R 4.5.0) |
-|Matrix            |1.7-4         |2025-08-28 |CRAN (R 4.5.0) |
+|Matrix            |1.7-4         |2025-08-28 |CRAN (R 4.5.2) |
 |memoise           |2.0.1         |2021-11-26 |CRAN (R 4.5.0) |
 |mime              |0.13          |2025-03-17 |CRAN (R 4.5.0) |
 |minqa             |1.2.8         |2024-08-17 |CRAN (R 4.5.0) |
-|mvtnorm           |1.3-5         |2026-03-11 |CRAN (R 4.5.2) |
+|mvtnorm           |1.3-3         |2025-01-10 |CRAN (R 4.5.0) |
 |NHANES            |2.1.0         |2015-07-02 |CRAN (R 4.5.0) |
-|nlme              |3.1-168       |2025-03-31 |CRAN (R 4.5.0) |
+|nlme              |3.1-168       |2025-03-31 |CRAN (R 4.5.2) |
 |nloptr            |2.2.1         |2025-03-17 |CRAN (R 4.5.0) |
-|nnet              |7.3-20        |2025-01-01 |CRAN (R 4.5.0) |
+|nnet              |7.3-20        |2025-01-01 |CRAN (R 4.5.2) |
 |officer           |0.7.3         |2026-01-16 |CRAN (R 4.5.2) |
 |opdisDownsampling |1.0.1         |2024-04-15 |CRAN (R 4.5.0) |
-|openssl           |2.3.5         |2026-02-26 |CRAN (R 4.5.2) |
-|openxlsx2         |1.25          |2026-03-07 |CRAN (R 4.5.2) |
+|openssl           |2.3.4         |2025-09-30 |CRAN (R 4.5.0) |
+|openxlsx2         |1.23.1        |2026-01-19 |CRAN (R 4.5.2) |
 |otel              |0.2.0         |2025-08-29 |CRAN (R 4.5.0) |
 |parameters        |0.28.3        |2025-11-25 |CRAN (R 4.5.2) |
 |patchwork         |1.3.2         |2025-08-25 |CRAN (R 4.5.0) |
@@ -154,7 +156,7 @@
 |qqplotr           |0.0.7         |2025-09-05 |CRAN (R 4.5.0) |
 |quarto            |1.5.1         |2025-09-04 |CRAN (R 4.5.0) |
 |R6                |2.6.1         |2025-02-15 |CRAN (R 4.5.0) |
-|ragg              |1.5.1         |2026-03-06 |CRAN (R 4.5.2) |
+|ragg              |1.5.0         |2025-09-02 |CRAN (R 4.5.0) |
 |rankinPlot        |1.1.0         |2023-01-30 |CRAN (R 4.5.0) |
 |rbibutils         |2.4.1         |2026-01-21 |CRAN (R 4.5.2) |
 |RColorBrewer      |1.1-3         |2022-04-03 |CRAN (R 4.5.0) |
@@ -170,14 +172,14 @@
 |reformulas        |0.4.4         |2026-02-02 |CRAN (R 4.5.2) |
 |remotes           |2.5.0         |2024-03-17 |CRAN (R 4.5.0) |
 |rempsyc           |0.2.0         |2025-09-15 |CRAN (R 4.5.0) |
-|renv              |1.1.8         |2026-03-05 |CRAN (R 4.5.2) |
+|renv              |1.1.7         |2026-01-27 |CRAN (R 4.5.2) |
 |reshape2          |1.4.5         |2025-11-12 |CRAN (R 4.5.0) |
 |rio               |1.2.4         |2025-09-26 |CRAN (R 4.5.0) |
 |rlang             |1.1.7         |2026-01-09 |CRAN (R 4.5.2) |
 |rmarkdown         |2.30          |2025-09-28 |CRAN (R 4.5.0) |
 |robustbase        |0.99-7        |2026-02-05 |CRAN (R 4.5.2) |
 |roxygen2          |7.3.3         |2025-09-03 |CRAN (R 4.5.0) |
-|rpart             |4.1.24        |2025-01-07 |CRAN (R 4.5.0) |
+|rpart             |4.1.24        |2025-01-07 |CRAN (R 4.5.2) |
 |rprojroot         |2.1.1         |2025-08-26 |CRAN (R 4.5.0) |
 |rsconnect         |1.7.0         |2025-12-06 |CRAN (R 4.5.2) |
 |rstudioapi        |0.18.0        |2026-01-16 |CRAN (R 4.5.2) |
@@ -191,13 +193,14 @@
 |shinybusy         |0.3.3         |2024-03-09 |CRAN (R 4.5.0) |
 |shinyjs           |2.1.1         |2026-01-15 |CRAN (R 4.5.2) |
 |shinyTime         |1.0.3         |2022-08-19 |CRAN (R 4.5.0) |
-|shinyWidgets      |0.9.1         |2026-03-09 |CRAN (R 4.5.2) |
+|shinyWidgets      |0.9.0         |2025-02-21 |CRAN (R 4.5.0) |
 |smd               |0.8.0         |2025-02-12 |CRAN (R 4.5.0) |
 |stringi           |1.8.7         |2025-03-27 |CRAN (R 4.5.0) |
 |stringr           |1.6.0         |2025-11-04 |CRAN (R 4.5.0) |
 |stRoke            |25.9.2        |2025-09-30 |CRAN (R 4.5.0) |
-|systemfonts       |1.3.2         |2026-03-05 |CRAN (R 4.5.2) |
-|textshaping       |1.0.5         |2026-03-06 |CRAN (R 4.5.2) |
+|systemfonts       |1.3.1         |2025-10-01 |CRAN (R 4.5.0) |
+|testthat          |3.3.2         |2026-01-11 |CRAN (R 4.5.2) |
+|textshaping       |1.0.4         |2025-10-10 |CRAN (R 4.5.0) |
 |thematic          |0.1.8         |2025-09-29 |CRAN (R 4.5.0) |
 |tibble            |3.3.1         |2026-01-11 |CRAN (R 4.5.2) |
 |tidyr             |1.3.2         |2025-12-19 |CRAN (R 4.5.2) |
@@ -217,6 +220,6 @@
 |writexl           |1.5.4         |2025-04-15 |CRAN (R 4.5.0) |
 |xfun              |0.56          |2026-01-18 |CRAN (R 4.5.2) |
 |xml2              |1.5.2         |2026-01-17 |CRAN (R 4.5.2) |
-|xtable            |1.8-8         |2026-02-22 |CRAN (R 4.5.2) |
+|xtable            |1.8-4         |2019-04-21 |CRAN (R 4.5.0) |
 |yaml              |2.3.12        |2025-12-10 |CRAN (R 4.5.2) |
 |zip               |2.3.3         |2025-05-13 |CRAN (R 4.5.0) |

app_docker/Dockerfile

@@ -3,7 +3,7 @@ RUN apt-get update -y && apt-get install -y  cmake make libcurl4-openssl-dev lib
 RUN mkdir -p /usr/local/lib/R/etc/ /usr/lib/R/etc/
 RUN echo "options(renv.config.pak.enabled = FALSE, repos = c(CRAN = 'https://cran.rstudio.com/'), download.file.method = 'libcurl', Ncpus = 4)" | tee /usr/local/lib/R/etc/Rprofile.site | tee /usr/lib/R/etc/Rprofile.site
 RUN R -e 'install.packages("remotes")'
-RUN R -e 'remotes::install_version("renv", version = "1.1.8")'
+RUN R -e 'remotes::install_version("renv", version = "1.1.7")'
 COPY renv.lock renv.lock
 RUN --mount=type=cache,id=renv-cache,target=/root/.cache/R/renv R -e 'renv::restore()'
 WORKDIR /srv/shiny-server/

app_docker/app.R

@@ -1,7 +1,7 @@
 
 
 ########
-#### Current file: /var/folders/9l/xbc19wxx0g79jdd2sf_0v291mhwh7f/T//RtmpZZ6Yua/file58174f49b1bf.R 
+#### Current file: /var/folders/9l/xbc19wxx0g79jdd2sf_0v291mhwh7f/T//RtmpsadCw0/file14b247eddca29.R 
 ########
 
 i18n_path <- here::here("translations")
@@ -45,7 +45,8 @@ library(rlang)
 library(shiny.i18n)
 library(fontawesome)
 
-# print(list.files("www/fonts/montserrat", full.names = TRUE))
+print(list.files("www/fonts/montserrat", full.names = TRUE))
+
 
 ## Translation init
 i18n <- shiny.i18n::Translator$new(translation_csvs_path = i18n_path)
@@ -53,6 +54,16 @@ i18n <- shiny.i18n::Translator$new(translation_csvs_path = i18n_path)
 # i18n <- shiny.i18n::Translator$new(translation_csvs_path = here::here("inst/translations/"))
 i18n$set_translation_language("en")
 
+## Global freesearchR vars
+if (!"global_freesearchR" %in% ls(name = globalenv())) {
+  global_freesearchR <- list(
+    include_globalenv = FALSE,
+    data_limit_default = 1000,
+    data_limit_upper = 10000,
+    data_limit_lower = 1
+  )
+}
+
 
 ########
 #### Current file: /Users/au301842/FreesearchR/app/functions.R 
@@ -64,7 +75,7 @@ i18n$set_translation_language("en")
 #### Current file: /Users/au301842/FreesearchR/R//app_version.R 
 ########
 
-app_version <- function()'26.3.4'
+app_version <- function()'26.3.2'
 
 
 ########
@@ -2957,7 +2968,7 @@ add_sparkline <- function(grid, column = "vals", color.main = "#2a8484", color.s
         type <- "line"
         ds <- data.frame(x = NA, y = NA)
         horizontal <- FALSE
-      } else if ("factor" %in% data_cl) {
+      } else if (identical(data_cl, "factor")) {
         type <- "column"
         s <- summary(data)
         ds <- data.frame(x = names(s), y = s)
@@ -3887,23 +3898,20 @@ file_export <- function(data,
 #'   head(5) |>
 #'   str()
 default_parsing <- function(data) {
-  # name_labels <- lapply(data, \(.x) REDCapCAST::get_attr(.x, attr = "label"))
+  name_labels <- lapply(data, \(.x) REDCapCAST::get_attr(.x, attr = "label"))
   # browser()
-  with_labels(data,{
-    data |>
-      setNames(make.names(names(data), unique = TRUE)) |>
-      ## Temporary step to avoid nested list and crashing
-      remove_nested_list() |>
-      REDCapCAST::parse_data() |>
-      REDCapCAST::as_factor() |>
-      REDCapCAST::numchar2fct(numeric.threshold = 8,
-                              character.throshold = 10) |>
-      REDCapCAST::as_logical() |>
-      REDCapCAST::fct_drop()
-  })
-  # out <-
-  #
-  # set_column_label(out, setNames(name_labels, names(out)), overwrite = FALSE)
+  out <- data |>
+    setNames(make.names(names(data), unique = TRUE)) |>
+    ## Temporary step to avoid nested list and crashing
+    remove_nested_list() |>
+    REDCapCAST::parse_data() |>
+    REDCapCAST::as_factor() |>
+    REDCapCAST::numchar2fct(numeric.threshold = 8,
+                            character.throshold = 10) |>
+    REDCapCAST::as_logical() |>
+    REDCapCAST::fct_drop()
+
+  set_column_label(out, setNames(name_labels, names(out)), overwrite = FALSE)
 
   # purrr::map2(
   #   out,
@@ -4027,28 +4035,33 @@ missing_fraction <- function(data) {
 #'   sample(c(1:8, NA), 20, TRUE)
 #' ) |> data_description()
 data_description <- function(data, data_text = "Data") {
-  # Resolve reactive once
-  if (shiny::is.reactive(data)) data <- data()
-
-  # Early return if null
-  if (is.null(data)) return(i18n$t("No data present."))
+  data <- if (shiny::is.reactive(data))
+    data()
+  else
+    data
 
   n <- nrow(data)
-
-  # Early return if empty
-  if (n == 0L) return(i18n$t("No data present."))
-
   n_var <- ncol(data)
-
-  # Faster complete.cases alternative using rowSums on NA matrix
-  n_complete <- n - sum(rowSums(is.na(data)) > 0L)
+  n_complete <- sum(complete.cases(data))
   p_complete <- signif(100 * n_complete / n, 3)
 
-  glue::glue(
-    i18n$t(
-      "{data_text} has {n} observations and {n_var} variables, with {n_complete} ({p_complete} %) complete cases."
+  if (is.null(data)) {
+    i18n$t("No data present.")
+  } else {
+    glue::glue(
+      i18n$t(
+        "{data_text} has {n} observations and {n_var} variables, with {n_complete} ({p_complete} %) complete cases."
+      )
     )
-  )
+  }
+  # sprintf(
+  #   "%s has %s observations and %s variables, with %s (%s%%) complete cases.",
+  #   data_text,
+  #   n,
+  #   n_var,
+  #   n_complete,
+  #   p_complete
+  # )
 }
 
 
@@ -4514,7 +4527,7 @@ data_types <- function() {
 #### Current file: /Users/au301842/FreesearchR/R//hosted_version.R 
 ########
 
-hosted_version <- function()'v26.3.4-260312'
+hosted_version <- function()'v26.3.2-260311'
 
 
 ########
@@ -5974,16 +5987,16 @@ landing_page_ui <- function(i18n) {
 #' data(mtcars)
 #' launch_FreesearchR(launch.browser = TRUE)
 #' }
-launch_FreesearchR <- function(include_globalenv = TRUE,
+launch_FreesearchR <- function(inlcude_globalenv = TRUE,
                                data_limit_default = 1000,
                                data_limit_upper = 100000,
                                data_limit_lower = 1,
                                ...) {
-  Sys.setenv(
-    INCLUDE_GLOBALENV = include_globalenv,
-    DATA_LIMIT_DEFAULT = data_limit_default,
-    DATA_LIMIT_UPPER = data_limit_upper,
-    DATA_LIMIT_LOWER = data_limit_lower
+  global_freesearchR <- list(
+    include_globalenv = include_globalenv,
+    data_limit_default = data_limit_default,
+    data_limit_upper = data_limit_upper,
+    data_limit_lower = data_limit_lower
   )
 
   appDir <- system.file("apps", "FreesearchR", package = "FreesearchR")
@@ -5997,123 +6010,6 @@ launch_FreesearchR <- function(include_globalenv = TRUE,
 }
 
 
-## Helper to set env variables
-get_config <- function(var_name, default = NULL) {
-  val <- Sys.getenv(var_name, unset = NA_character_)
-
-  # Only use env var if it is explicitly set and non-empty
-  if (!is.na(val) && nzchar(trimws(val))) {
-    if (is.logical(default)) return(to_logical(val))
-    if (is.numeric(default)) return(as.numeric(val))
-    return(val)
-  }
-
-  if (!is.null(default)) {
-    return(default)
-  }
-
-  stop(paste("Required config variable not set:", var_name))
-}
-
-to_logical <- function(x) {
-  result <- switch(tolower(trimws(as.character(x))),
-                   "true"  = , "1" = , "yes" = TRUE,
-                   "false" = , "0" = , "no"  = FALSE,
-                   NA
-  )
-  if (is.na(result)) stop(paste("Cannot coerce to logical:", x))
-  result
-}
-
-
-## File loader - based on the module, uses hard coded default values
-load_file <- function(path) {
-  read_fns <- list(
-    ods  = "import_ods",
-    dta  = "import_dta",
-    csv  = "import_delim",
-    tsv  = "import_delim",
-    txt  = "import_delim",
-    xls  = "import_xls",
-    xlsx = "import_xls",
-    rds  = "import_rds"
-  )
-
-  ext <- tolower(tools::file_ext(path))
-
-  if (!ext %in% names(read_fns)) {
-    message("Unsupported file type, skipping: ", basename(path), " (.", ext, ")")
-    return(NULL)
-  }
-
-  read_fn <- read_fns[[ext]]
-
-  parameters <- list(
-    file     = path,
-    sheet    = 1,
-    skip     = 0,
-    dec      = ".",
-    encoding = "unknown"
-  )
-
-  # Trim parameters to only those accepted by the target function
-  parameters <- parameters[which(names(parameters) %in% rlang::fn_fmls_names(get(read_fn)))]
-
-  result <- tryCatch(
-    rlang::exec(read_fn, !!!parameters),
-    error = function(e) {
-      # Fall back to rio::import
-      message("Primary loader failed for ", basename(path), ", trying rio::import")
-      tryCatch(
-        rio::import(path),
-        error = function(e2) {
-          message("Failed to load ", basename(path), ": ", e2$message)
-          NULL
-        }
-      )
-    }
-  )
-
-  if (!is.null(result) && NROW(result) < 1) {
-    message("File loaded but contains no rows, skipping: ", basename(path))
-    return(NULL)
-  }
-
-  result
-}
-
-
-load_folder <- function(folder = "/app/data", envir = .GlobalEnv) {
-  if (is.null(folder) || !dir.exists(folder)) {
-    message("No data folder found, skipping load")
-    return(invisible(NULL))
-  }
-
-  files <- list.files(folder, full.names = TRUE)
-  if (length(files) == 0) {
-    message("Data folder is empty, skipping load")
-    return(invisible(NULL))
-  }
-
-  loaded <- vapply(files, function(file) {
-    result <- load_file(file)
-    if (is.null(result))
-      return(FALSE)
-    name <- tools::file_path_sans_ext(basename(file))
-    assign(name, default_parsing(result), envir = envir)
-    TRUE
-  }, logical(1))
-
-  message(sprintf(
-    "Loaded %d/%d files from %s",
-    sum(loaded),
-    length(files),
-    folder
-  ))
-  invisible(loaded)
-}
-
-
 ########
 #### Current file: /Users/au301842/FreesearchR/R//missings-module.R 
 ########
@@ -10830,9 +10726,9 @@ ui_elements <- function(selection) {
               layout_params = "dropdown",
               # title = "Choose a datafile to upload",
               file_extensions = c(".csv", ".tsv", ".txt", ".xls", ".xlsx", ".rds", ".ods", ".dta"),
-              limit_default = DATA_LIMIT_DEFAULT,
-              limit_lower = DATA_LIMIT_LOWER,
-              limit_upper = DATA_LIMIT_UPPER
+              limit_default = global_freesearchR$data_limit_default,
+              limit_lower = global_freesearchR$data_limit_lower,
+              limit_upper = global_freesearchR$data_limit_upper
 
             )
           ),
@@ -10854,7 +10750,7 @@ ui_elements <- function(selection) {
               id = "env",
               title = NULL,
               packages = c("NHANES", "stRoke", "datasets", "MASS"),
-              globalenv = isTruthy(INCLUDE_GLOBALENV)
+              globalenv = global_freesearchR$include_globalenv
             )
           ),
           # shiny::conditionalPanel(
@@ -13705,28 +13601,6 @@ dev_banner <- function(){
       }
 
 
-########
-#### Current file: /Users/au301842/FreesearchR/app/globals.R 
-########
-
-## Setting global variables
-INCLUDE_GLOBALENV <- get_config("INCLUDE_GLOBALENV", default = FALSE)
-DATA_LIMIT_DEFAULT <- get_config("DATA_LIMIT_DEFAULT", default = 10000)
-DATA_LIMIT_UPPER <- get_config("DATA_LIMIT_UPPER", default = 100000)
-DATA_LIMIT_LOWER <- get_config("DATA_LIMIT_LOWER", default = 1)
-
-## Loads folder passed to the docker container and mounted as below:
-##
-##    services:
-##      shiny:
-##        image: your-shiny-app
-##      volumes:
-##        - ./data:/app/data:ro
-##
-##  All files in the ./data/ folder is attempted loaded
-load_folder()
-
-
 ########
 #### Current file: /Users/au301842/FreesearchR/app/ui.R 
 ########
@@ -13924,9 +13798,9 @@ server <- function(input, output, session) {
     #   selected = "file"
     # )
 
-    if (isTruthy(INCLUDE_GLOBALENV)) {
+    if (isTRUE(global_freesearchR$include_globalenv)) {
       env_label <- i18n$t("Local or sample data")
-      output$data_sample_text <- shiny::renderUI(shiny::helpText(
+      output$data_sample_text <- shiny::renderText(shiny::helpText(
         i18n$t(
           "Upload a file, get data directly from REDCap or use local or sample data."
         )
@@ -14019,7 +13893,7 @@ server <- function(input, output, session) {
     trigger_return = "change",
     btn_show_data = FALSE,
     reset = reactive(input$hidden),
-    limit_data = DATA_LIMIT_UPPER
+    limit_data = global_freesearchR$data_limit_upper
   )
 
   shiny::observeEvent(from_env$data(), {

app_docker/renv.lock

@@ -2761,7 +2761,7 @@
     },
     "effectsize": {
       "Package": "effectsize",
-      "Version": "1.0.2",
+      "Version": "1.0.1",
       "Source": "Repository",
       "Type": "Package",
       "Title": "Indices of Effect Size",
@@ -2775,11 +2775,11 @@
         "R (>= 4.0)"
       ],
       "Imports": [
-        "bayestestR (>= 0.17.0)",
-        "insight (>= 1.4.5)",
-        "parameters (>= 0.28.3)",
-        "performance (>= 0.15.3)",
-        "datawizard (>= 1.3.0)",
+        "bayestestR (>= 0.16.0)",
+        "insight (>= 1.3.0)",
+        "parameters (>= 0.26.0)",
+        "performance (>= 0.14.0)",
+        "datawizard (>= 1.1.0)",
         "stats",
         "utils"
       ],
@@ -2809,7 +2809,7 @@
       "VignetteBuilder": "knitr",
       "Encoding": "UTF-8",
       "Language": "en-US",
-      "RoxygenNote": "7.3.3",
+      "RoxygenNote": "7.3.2",
       "Config/testthat/edition": "3",
       "Config/testthat/parallel": "true",
       "Config/Needs/website": "rstudio/bslib, r-lib/pkgdown, easystats/easystatstemplate",
@@ -3405,10 +3405,10 @@
     },
     "foreign": {
       "Package": "foreign",
-      "Version": "0.8-91",
+      "Version": "0.8-90",
       "Source": "Repository",
       "Priority": "recommended",
-      "Date": "2026-01-29",
+      "Date": "2025-03-31",
       "Title": "Read Data Stored by 'Minitab', 'S', 'SAS', 'SPSS', 'Stata', 'Systat', 'Weka', 'dBase', ...",
       "Depends": [
         "R (>= 4.0.0)"
@@ -3429,22 +3429,22 @@
       "MailingList": "R-help@r-project.org",
       "URL": "https://svn.r-project.org/R-packages/trunk/foreign/",
       "NeedsCompilation": "yes",
-      "Author": "R Core Team [aut, cph, cre] (ROR: <https://ror.org/02zz1nj61>), Roger Bivand [ctb, cph], Vincent J. Carey [ctb, cph], Saikat DebRoy [ctb, cph], Stephen Eglen [ctb, cph], Rajarshi Guha [ctb, cph], Swetlana Herbrandt [ctb], Nicholas Lewin-Koh [ctb, cph], Mark Myatt [ctb, cph], Michael Nelson [ctb], Ben Pfaff [ctb], Brian Quistorff [ctb], Frank Warmerdam [ctb, cph], Stephen Weigand [ctb, cph], Free Software Foundation, Inc. [cph]",
+      "Author": "R Core Team [aut, cph, cre] (02zz1nj61), Roger Bivand [ctb, cph], Vincent J. Carey [ctb, cph], Saikat DebRoy [ctb, cph], Stephen Eglen [ctb, cph], Rajarshi Guha [ctb, cph], Swetlana Herbrandt [ctb], Nicholas Lewin-Koh [ctb, cph], Mark Myatt [ctb, cph], Michael Nelson [ctb], Ben Pfaff [ctb], Brian Quistorff [ctb], Frank Warmerdam [ctb, cph], Stephen Weigand [ctb, cph], Free Software Foundation, Inc. [cph]",
       "Maintainer": "R Core Team <R-core@R-project.org>",
       "Repository": "CRAN"
     },
     "fs": {
       "Package": "fs",
-      "Version": "1.6.7",
+      "Version": "1.6.6",
       "Source": "Repository",
       "Title": "Cross-Platform File System Operations Based on 'libuv'",
-      "Authors@R": "c( person(\"Jim\", \"Hester\", role = \"aut\"), person(\"Hadley\", \"Wickham\", role = \"aut\"), person(\"Gábor\", \"Csárdi\", role = \"aut\"), person(\"Jeroen\", \"Ooms\", , \"jeroenooms@gmail.com\", role = \"cre\"), person(\"libuv project contributors\", role = \"cph\", comment = \"libuv library\"), person(\"Joyent, Inc. and other Node contributors\", role = \"cph\", comment = \"libuv library\"), person(\"Posit Software, PBC\", role = c(\"cph\", \"fnd\"), comment = c(ROR = \"03wc8by49\")) )",
+      "Authors@R": "c( person(\"Jim\", \"Hester\", role = \"aut\"), person(\"Hadley\", \"Wickham\", , \"hadley@posit.co\", role = \"aut\"), person(\"Gábor\", \"Csárdi\", , \"csardi.gabor@gmail.com\", role = c(\"aut\", \"cre\")), person(\"libuv project contributors\", role = \"cph\", comment = \"libuv library\"), person(\"Joyent, Inc. and other Node contributors\", role = \"cph\", comment = \"libuv library\"), person(\"Posit Software, PBC\", role = c(\"cph\", \"fnd\")) )",
       "Description": "A cross-platform interface to file system operations, built on top of the 'libuv' C library.",
       "License": "MIT + file LICENSE",
       "URL": "https://fs.r-lib.org, https://github.com/r-lib/fs",
       "BugReports": "https://github.com/r-lib/fs/issues",
       "Depends": [
-        "R (>= 4.1)"
+        "R (>= 3.6)"
       ],
       "Imports": [
         "methods"
@@ -3465,15 +3465,14 @@
       "ByteCompile": "true",
       "Config/Needs/website": "tidyverse/tidytemplate",
       "Config/testthat/edition": "3",
-      "Config/usethis/last-upkeep": "2025-04-23",
       "Copyright": "file COPYRIGHTS",
       "Encoding": "UTF-8",
       "Language": "en-US",
-      "RoxygenNote": "7.3.3",
+      "RoxygenNote": "7.2.3",
       "SystemRequirements": "GNU make",
       "NeedsCompilation": "yes",
-      "Author": "Jim Hester [aut], Hadley Wickham [aut], Gábor Csárdi [aut], Jeroen Ooms [cre], libuv project contributors [cph] (libuv library), Joyent, Inc. and other Node contributors [cph] (libuv library), Posit Software, PBC [cph, fnd] (ROR: <https://ror.org/03wc8by49>)",
-      "Maintainer": "Jeroen Ooms <jeroenooms@gmail.com>",
+      "Author": "Jim Hester [aut], Hadley Wickham [aut], Gábor Csárdi [aut, cre], libuv project contributors [cph] (libuv library), Joyent, Inc. and other Node contributors [cph] (libuv library), Posit Software, PBC [cph, fnd]",
+      "Maintainer": "Gábor Csárdi <csardi.gabor@gmail.com>",
       "Repository": "CRAN"
     },
     "gap": {
@@ -3643,7 +3642,7 @@
     },
     "ggalluvial": {
       "Package": "ggalluvial",
-      "Version": "0.12.6",
+      "Version": "0.12.5",
       "Source": "Repository",
       "Type": "Package",
       "Title": "Alluvial Plots in 'ggplot2'",
@@ -3890,7 +3889,7 @@
     },
     "ggstats": {
       "Package": "ggstats",
-      "Version": "0.13.0",
+      "Version": "0.12.0",
       "Source": "Repository",
       "Type": "Package",
       "Title": "Extension to 'ggplot2' for Plotting Stats",
@@ -4289,7 +4288,7 @@
     },
     "highr": {
       "Package": "highr",
-      "Version": "0.12",
+      "Version": "0.11",
       "Source": "Repository",
       "Type": "Package",
       "Title": "Syntax Highlighting for R Source Code",
@@ -4311,9 +4310,9 @@
       "BugReports": "https://github.com/yihui/highr/issues",
       "VignetteBuilder": "knitr",
       "Encoding": "UTF-8",
-      "RoxygenNote": "7.3.3",
+      "RoxygenNote": "7.3.1",
       "NeedsCompilation": "no",
-      "Author": "Yihui Xie [aut, cre] (ORCID: <https://orcid.org/0000-0003-0645-5666>), Yixuan Qiu [aut], Christopher Gandrud [ctb], Qiang Li [ctb]",
+      "Author": "Yihui Xie [aut, cre] (<https://orcid.org/0000-0003-0645-5666>), Yixuan Qiu [aut], Christopher Gandrud [ctb], Qiang Li [ctb]",
       "Maintainer": "Yihui Xie <xie@yihui.name>",
       "Repository": "CRAN"
     },
@@ -5042,7 +5041,7 @@
     },
     "later": {
       "Package": "later",
-      "Version": "1.4.8",
+      "Version": "1.4.6",
       "Source": "Repository",
       "Type": "Package",
       "Title": "Utilities for Scheduling Functions to Execute Later with Event Loops",
@@ -5218,74 +5217,72 @@
     },
     "lme4": {
       "Package": "lme4",
-      "Version": "2.0-1",
+      "Version": "1.1-38",
       "Source": "Repository",
       "Title": "Linear Mixed-Effects Models using 'Eigen' and S4",
-      "Authors@R": "c(person(\"Douglas\", \"Bates\", role = \"aut\", comment = c(ORCID = \"0000-0001-8316-9503\")), person(\"Martin\", \"Maechler\", role = \"aut\", comment = c(ORCID = \"0000-0002-8685-9910\")), person(\"Ben\", \"Bolker\", role = c(\"cre\", \"aut\"), email = \"bbolker+lme4@gmail.com\", comment = c(ORCID = \"0000-0002-2127-0443\")), person(\"Steven\", \"Walker\", role = \"aut\", comment = c(ORCID = \"0000-0002-4394-9078\")), person(\"Rune Haubo Bojesen\", \"Christensen\", role = \"ctb\", comment = c(ORCID = \"0000-0002-4494-3399\")), person(\"Henrik\", \"Singmann\", role = \"ctb\", comment = c(ORCID = \"0000-0002-4842-3657\")), person(\"Bin\", \"Dai\", role = \"ctb\"), person(\"Fabian\", \"Scheipl\", role = \"ctb\", comment = c(ORCID = \"0000-0001-8172-3603\")), person(\"Gabor\", \"Grothendieck\", role = \"ctb\"), person(\"Peter\", \"Green\", role = \"ctb\", comment = c(ORCID = \"0000-0002-0238-9852\")), person(\"John\", \"Fox\", role = \"ctb\"), person(\"Alexander\", \"Bauer\", role = \"ctb\"), person(\"Pavel N.\", \"Krivitsky\", role = c(\"ctb\", \"cph\"), comment = c(ORCID = \"0000-0002-9101-3362\", \"shared copyright on simulate.formula\")), person(\"Emi\", \"Tanaka\", role = \"ctb\", comment = c(ORCID = \"0000-0002-1455-259X\")), person(\"Mikael\", \"Jagan\", role = \"aut\", comment = c(ORCID = \"0000-0002-3542-2938\")), person(\"Ross D.\", \"Boylan\", role = \"ctb\", comment = c(ORCID = \"0009-0003-4123-8090\")), person(\"Anna\", \"Ly\", role = \"aut\", comment = c(ORCID = \"0000-0002-0210-0342\")))",
-      "Description": "Fit linear and generalized linear mixed-effects models.  The models and their components are represented using S4 classes and methods.  The core computational algorithms are implemented using the 'Eigen' C++ library for numerical linear algebra and 'RcppEigen' \"glue\".",
+      "Authors@R": "c( person(\"Douglas\",\"Bates\", role=\"aut\", comment=c(ORCID=\"0000-0001-8316-9503\")), person(\"Martin\",\"Maechler\", role=\"aut\", comment=c(ORCID=\"0000-0002-8685-9910\")), person(\"Ben\",\"Bolker\",email=\"bbolker+lme4@gmail.com\", role=c(\"aut\",\"cre\"), comment=c(ORCID=\"0000-0002-2127-0443\")), person(\"Steven\",\"Walker\",role=\"aut\", comment=c(ORCID=\"0000-0002-4394-9078\")), person(\"Rune Haubo Bojesen\",\"Christensen\", role=\"ctb\", comment=c(ORCID=\"0000-0002-4494-3399\")), person(\"Henrik\",\"Singmann\", role=\"ctb\", comment=c(ORCID=\"0000-0002-4842-3657\")), person(\"Bin\", \"Dai\", role=\"ctb\"), person(\"Fabian\", \"Scheipl\", role=\"ctb\", comment=c(ORCID=\"0000-0001-8172-3603\")), person(\"Gabor\", \"Grothendieck\", role=\"ctb\"), person(\"Peter\", \"Green\", role=\"ctb\", comment=c(ORCID=\"0000-0002-0238-9852\")), person(\"John\", \"Fox\", role=\"ctb\"), person(\"Alexander\", \"Bauer\", role=\"ctb\"), person(\"Pavel N.\", \"Krivitsky\", role=c(\"ctb\",\"cph\"), comment=c(ORCID=\"0000-0002-9101-3362\", \"shared copyright on simulate.formula\")), person(\"Emi\", \"Tanaka\", role = \"ctb\", comment = c(ORCID=\"0000-0002-1455-259X\")), person(\"Mikael\", \"Jagan\", role = \"ctb\", comment = c(ORCID=\"0000-0002-3542-2938\")), person(\"Ross D.\", \"Boylan\", email=\"ross.boylan@ucsf.edu\", role=(\"ctb\"), comment = c(ORCID=\"0009-0003-4123-8090\")), person(\"Anna\", \"Ly\", role = \"ctb\", comment = c(ORCID = \"0000-0002-0210-0342\")) )",
+      "Description": "Fit linear and generalized linear mixed-effects models. The models and their components are represented using S4 classes and methods.  The core computational algorithms are implemented using the 'Eigen' C++ library for numerical linear algebra and 'RcppEigen' \"glue\".",
       "Depends": [
-        "R (>= 3.6)",
+        "R (>= 3.6.0)",
         "Matrix",
         "methods",
         "stats"
       ],
       "LinkingTo": [
-        "Matrix (>= 1.5-0)",
         "Rcpp (>= 0.10.5)",
-        "RcppEigen (>= 0.3.3.9.4)"
+        "RcppEigen (>= 0.3.3.9.4)",
+        "Matrix (>= 1.5-0)"
       ],
       "Imports": [
-        "MASS",
-        "Rdpack",
-        "boot",
         "graphics",
         "grid",
-        "lattice",
-        "minqa (>= 1.1.15)",
-        "nlme (>= 3.1-123)",
-        "nloptr (>= 1.0.4)",
-        "parallel",
-        "reformulas (>= 0.4.3.1)",
-        "rlang",
         "splines",
-        "utils"
+        "utils",
+        "parallel",
+        "MASS",
+        "lattice",
+        "boot",
+        "nlme (>= 3.1-123)",
+        "minqa (>= 1.1.15)",
+        "nloptr (>= 1.0.4)",
+        "reformulas (>= 0.3.0)",
+        "rlang",
+        "Rdpack"
       ],
+      "RdMacros": "Rdpack",
       "Suggests": [
-        "HSAUR3",
+        "knitr",
+        "rmarkdown",
         "MEMSS",
+        "testthat (>= 0.8.1)",
+        "ggplot2",
+        "mlmRev",
+        "optimx (>= 2013.8.6)",
+        "gamm4",
+        "pbkrtest",
+        "HSAUR3",
+        "numDeriv",
         "car",
         "dfoptim",
-        "gamm4",
-        "ggplot2",
-        "glmmTMB",
-        "knitr",
-        "merDeriv",
         "mgcv",
-        "mlmRev",
-        "numDeriv",
-        "optimx (>= 2013.8.6)",
-        "pbkrtest",
-        "rmarkdown",
+        "statmod",
         "rr2",
         "semEff",
-        "statmod",
-        "testthat (>= 0.8.1)",
-        "tibble"
+        "tibble",
+        "merDeriv"
       ],
       "Enhances": [
         "DHARMa",
         "performance"
       ],
-      "RdMacros": "Rdpack",
       "VignetteBuilder": "knitr",
       "LazyData": "yes",
       "License": "GPL (>= 2)",
       "URL": "https://github.com/lme4/lme4/",
       "BugReports": "https://github.com/lme4/lme4/issues",
       "Encoding": "UTF-8",
-      "RoxygenNote": "7.3.3",
       "NeedsCompilation": "yes",
-      "Author": "Douglas Bates [aut] (ORCID: <https://orcid.org/0000-0001-8316-9503>), Martin Maechler [aut] (ORCID: <https://orcid.org/0000-0002-8685-9910>), Ben Bolker [cre, aut] (ORCID: <https://orcid.org/0000-0002-2127-0443>), Steven Walker [aut] (ORCID: <https://orcid.org/0000-0002-4394-9078>), Rune Haubo Bojesen Christensen [ctb] (ORCID: <https://orcid.org/0000-0002-4494-3399>), Henrik Singmann [ctb] (ORCID: <https://orcid.org/0000-0002-4842-3657>), Bin Dai [ctb], Fabian Scheipl [ctb] (ORCID: <https://orcid.org/0000-0001-8172-3603>), Gabor Grothendieck [ctb], Peter Green [ctb] (ORCID: <https://orcid.org/0000-0002-0238-9852>), John Fox [ctb], Alexander Bauer [ctb], Pavel N. Krivitsky [ctb, cph] (ORCID: <https://orcid.org/0000-0002-9101-3362>, shared copyright on simulate.formula), Emi Tanaka [ctb] (ORCID: <https://orcid.org/0000-0002-1455-259X>), Mikael Jagan [aut] (ORCID: <https://orcid.org/0000-0002-3542-2938>), Ross D. Boylan [ctb] (ORCID: <https://orcid.org/0009-0003-4123-8090>), Anna Ly [aut] (ORCID: <https://orcid.org/0000-0002-0210-0342>)",
+      "Author": "Douglas Bates [aut] (ORCID: <https://orcid.org/0000-0001-8316-9503>), Martin Maechler [aut] (ORCID: <https://orcid.org/0000-0002-8685-9910>), Ben Bolker [aut, cre] (ORCID: <https://orcid.org/0000-0002-2127-0443>), Steven Walker [aut] (ORCID: <https://orcid.org/0000-0002-4394-9078>), Rune Haubo Bojesen Christensen [ctb] (ORCID: <https://orcid.org/0000-0002-4494-3399>), Henrik Singmann [ctb] (ORCID: <https://orcid.org/0000-0002-4842-3657>), Bin Dai [ctb], Fabian Scheipl [ctb] (ORCID: <https://orcid.org/0000-0001-8172-3603>), Gabor Grothendieck [ctb], Peter Green [ctb] (ORCID: <https://orcid.org/0000-0002-0238-9852>), John Fox [ctb], Alexander Bauer [ctb], Pavel N. Krivitsky [ctb, cph] (ORCID: <https://orcid.org/0000-0002-9101-3362>, shared copyright on simulate.formula), Emi Tanaka [ctb] (ORCID: <https://orcid.org/0000-0002-1455-259X>), Mikael Jagan [ctb] (ORCID: <https://orcid.org/0000-0002-3542-2938>), Ross D. Boylan [ctb] (ORCID: <https://orcid.org/0009-0003-4123-8090>), Anna Ly [ctb] (ORCID: <https://orcid.org/0000-0002-0210-0342>)",
       "Maintainer": "Ben Bolker <bbolker+lme4@gmail.com>",
       "Repository": "CRAN"
     },
@@ -5462,14 +5459,14 @@
     },
     "mgcv": {
       "Package": "mgcv",
-      "Version": "1.9-4",
+      "Version": "1.9-3",
       "Source": "Repository",
       "Authors@R": "person(given = \"Simon\", family = \"Wood\", role = c(\"aut\", \"cre\"), email = \"simon.wood@r-project.org\")",
       "Title": "Mixed GAM Computation Vehicle with Automatic Smoothness Estimation",
-      "Description": "Generalized additive (mixed) models, some of their extensions and  other generalized ridge regression with multiple smoothing  parameter estimation by (Restricted) Marginal Likelihood,  Cross Validation and similar, or using iterated nested Laplace approximation for fully Bayesian inference. See Wood (2025) <doi:10.1146/annurev-statistics-112723-034249> for an overview. Includes a gam() function, a wide variety of smoothers, 'JAGS' support and distributions beyond the exponential family.",
+      "Description": "Generalized additive (mixed) models, some of their extensions and  other generalized ridge regression with multiple smoothing  parameter estimation by (Restricted) Marginal Likelihood,  Generalized Cross Validation and similar, or using iterated  nested Laplace approximation for fully Bayesian inference. See  Wood (2017) <doi:10.1201/9781315370279> for an overview.  Includes a gam() function, a wide variety of smoothers, 'JAGS'  support and distributions beyond the exponential family.",
       "Priority": "recommended",
       "Depends": [
-        "R (>= 4.4.0)",
+        "R (>= 3.6.0)",
         "nlme (>= 3.1-64)"
       ],
       "Imports": [
@@ -5675,10 +5672,10 @@
     },
     "mvtnorm": {
       "Package": "mvtnorm",
-      "Version": "1.3-2",
+      "Version": "1.3-3",
       "Source": "Repository",
       "Title": "Multivariate Normal and t Distributions",
-      "Date": "2024-11-04",
+      "Date": "2025-01-09",
       "Authors@R": "c(person(\"Alan\", \"Genz\", role = \"aut\"), person(\"Frank\", \"Bretz\", role = \"aut\"), person(\"Tetsuhisa\", \"Miwa\", role = \"aut\"), person(\"Xuefei\", \"Mi\", role = \"aut\"), person(\"Friedrich\", \"Leisch\", role = \"ctb\"), person(\"Fabian\", \"Scheipl\", role = \"ctb\"), person(\"Bjoern\", \"Bornkamp\", role = \"ctb\", comment = c(ORCID = \"0000-0002-6294-8185\")), person(\"Martin\", \"Maechler\", role = \"ctb\", comment = c(ORCID = \"0000-0002-8685-9910\")), person(\"Torsten\", \"Hothorn\", role = c(\"aut\", \"cre\"), email = \"Torsten.Hothorn@R-project.org\", comment = c(ORCID = \"0000-0001-8301-0471\")))",
       "Description": "Computes multivariate normal and t probabilities, quantiles, random deviates,  and densities. Log-likelihoods for multivariate Gaussian models and Gaussian copulae  parameterised by Cholesky factors of covariance or precision matrices are implemented  for interval-censored and exact data, or a mix thereof. Score functions for these  log-likelihoods are available. A class representing multiple lower triangular matrices  and corresponding methods are part of this package.",
       "Imports": [
@@ -5885,7 +5882,7 @@
     },
     "openssl": {
       "Package": "openssl",
-      "Version": "2.3.5",
+      "Version": "2.3.4",
       "Source": "Repository",
       "Type": "Package",
       "Title": "Toolkit for Encryption, Signatures and Certificates Based on OpenSSL",
@@ -5918,7 +5915,7 @@
     },
     "openxlsx2": {
       "Package": "openxlsx2",
-      "Version": "1.25",
+      "Version": "1.23.1",
       "Source": "Repository",
       "Type": "Package",
       "Title": "Read, Write and Edit 'xlsx' Files",
@@ -5945,10 +5942,10 @@
         "ggplot2",
         "knitr",
         "mschart (>= 0.4)",
-        "openssl",
         "rmarkdown",
         "rvg",
         "testthat (>= 3.0.0)",
+        "waldo",
         "zip"
       ],
       "VignetteBuilder": "knitr",
@@ -7092,7 +7089,7 @@
     },
     "ragg": {
       "Package": "ragg",
-      "Version": "1.5.1",
+      "Version": "1.5.0",
       "Source": "Repository",
       "Type": "Package",
       "Title": "Graphic Devices Based on AGG",
@@ -7121,7 +7118,7 @@
       "Config/testthat/edition": "3",
       "Config/usethis/last-upkeep": "2025-04-25",
       "Encoding": "UTF-8",
-      "RoxygenNote": "7.3.3",
+      "RoxygenNote": "7.3.2",
       "SystemRequirements": "freetype2, libpng, libtiff, libjpeg, libwebp, libwebpmux",
       "NeedsCompilation": "yes",
       "Author": "Thomas Lin Pedersen [cre, aut] (ORCID: <https://orcid.org/0000-0002-5147-4711>), Maxim Shemanarev [aut, cph] (Author of AGG), Tony Juricic [ctb, cph] (Contributor to AGG), Milan Marusinec [ctb, cph] (Contributor to AGG), Spencer Garrett [ctb] (Contributor to AGG), Posit Software, PBC [cph, fnd] (ROR: <https://ror.org/03wc8by49>)",
@@ -7544,7 +7541,7 @@
     },
     "renv": {
       "Package": "renv",
-      "Version": "1.1.8",
+      "Version": "1.1.7",
       "Source": "Repository",
       "Type": "Package",
       "Title": "Project Environments",
@@ -7588,11 +7585,11 @@
       "Encoding": "UTF-8",
       "RoxygenNote": "7.3.3",
       "VignetteBuilder": "knitr",
-      "NeedsCompilation": "yes",
       "Config/Needs/website": "tidyverse/tidytemplate",
       "Config/testthat/edition": "3",
       "Config/testthat/parallel": "true",
       "Config/testthat/start-first": "bioconductor,python,install,restore,snapshot,retrieve,remotes",
+      "NeedsCompilation": "no",
       "Author": "Kevin Ushey [aut, cre] (ORCID: <https://orcid.org/0000-0003-2880-7407>), Hadley Wickham [aut] (ORCID: <https://orcid.org/0000-0003-4757-117X>), Posit Software, PBC [cph, fnd]",
       "Maintainer": "Kevin Ushey <kevin@rstudio.com>",
       "Repository": "CRAN"
@@ -8320,7 +8317,7 @@
     },
     "shinyWidgets": {
       "Package": "shinyWidgets",
-      "Version": "0.9.1",
+      "Version": "0.9.0",
       "Source": "Repository",
       "Title": "Custom Inputs Widgets for Shiny",
       "Authors@R": "c( person(\"Victor\", \"Perrier\", email = \"victor.perrier@dreamrs.fr\", role = c(\"aut\", \"cre\", \"cph\")), person(\"Fanny\", \"Meyer\", role = \"aut\"), person(\"David\", \"Granjon\", role = \"aut\"), person(\"Ian\", \"Fellows\", role = \"ctb\", comment = \"Methods for mutating vertical tabs & updateMultiInput\"), person(\"Wil\", \"Davis\", role = \"ctb\", comment = \"numericRangeInput function\"), person(\"Spencer\", \"Matthews\", role = \"ctb\", comment = \"autoNumeric methods\"), person(family = \"JavaScript and CSS libraries authors\", role = c(\"ctb\", \"cph\"), comment = \"All authors are listed in LICENSE.md\") )",
@@ -8330,7 +8327,7 @@
       "License": "GPL-3",
       "Encoding": "UTF-8",
       "LazyData": "true",
-      "RoxygenNote": "7.3.3",
+      "RoxygenNote": "7.3.2",
       "Depends": [
         "R (>= 3.1.0)"
       ],
@@ -8627,7 +8624,7 @@
     },
     "systemfonts": {
       "Package": "systemfonts",
-      "Version": "1.3.2",
+      "Version": "1.3.1",
       "Source": "Repository",
       "Type": "Package",
       "Title": "System Native Font Finding",
@@ -8675,7 +8672,7 @@
     },
     "textshaping": {
       "Package": "textshaping",
-      "Version": "1.0.5",
+      "Version": "1.0.4",
       "Source": "Repository",
       "Title": "Bindings to the 'HarfBuzz' and 'Fribidi' Libraries for Text Shaping",
       "Authors@R": "c( person(\"Thomas Lin\", \"Pedersen\", , \"thomas.pedersen@posit.co\", role = c(\"cre\", \"aut\"), comment = c(ORCID = \"0000-0002-5147-4711\")), person(\"Posit Software, PBC\", role = c(\"cph\", \"fnd\"), comment = c(ROR = \"03wc8by49\")) )",
@@ -9516,23 +9513,21 @@
     },
     "xtable": {
       "Package": "xtable",
-      "Version": "1.8-8",
+      "Version": "1.8-4",
       "Source": "Repository",
-      "Date": "2026-02-20",
+      "Date": "2019-04-08",
       "Title": "Export Tables to LaTeX or HTML",
       "Authors@R": "c(person(\"David B.\", \"Dahl\", role=\"aut\"), person(\"David\", \"Scott\", role=c(\"aut\",\"cre\"), email=\"d.scott@auckland.ac.nz\"), person(\"Charles\", \"Roosen\", role=\"aut\"), person(\"Arni\", \"Magnusson\", role=\"aut\"), person(\"Jonathan\", \"Swinton\", role=\"aut\"), person(\"Ajay\", \"Shah\", role=\"ctb\"), person(\"Arne\", \"Henningsen\", role=\"ctb\"), person(\"Benno\", \"Puetz\", role=\"ctb\"), person(\"Bernhard\", \"Pfaff\", role=\"ctb\"), person(\"Claudio\", \"Agostinelli\", role=\"ctb\"), person(\"Claudius\", \"Loehnert\", role=\"ctb\"), person(\"David\", \"Mitchell\", role=\"ctb\"), person(\"David\", \"Whiting\", role=\"ctb\"), person(\"Fernando da\", \"Rosa\", role=\"ctb\"), person(\"Guido\", \"Gay\", role=\"ctb\"), person(\"Guido\", \"Schulz\", role=\"ctb\"), person(\"Ian\", \"Fellows\", role=\"ctb\"), person(\"Jeff\", \"Laake\", role=\"ctb\"), person(\"John\", \"Walker\", role=\"ctb\"), person(\"Jun\", \"Yan\", role=\"ctb\"), person(\"Liviu\", \"Andronic\", role=\"ctb\"), person(\"Markus\", \"Loecher\", role=\"ctb\"), person(\"Martin\", \"Gubri\", role=\"ctb\"), person(\"Matthieu\", \"Stigler\", role=\"ctb\"), person(\"Robert\", \"Castelo\", role=\"ctb\"), person(\"Seth\", \"Falcon\", role=\"ctb\"), person(\"Stefan\", \"Edwards\", role=\"ctb\"), person(\"Sven\", \"Garbade\", role=\"ctb\"), person(\"Uwe\", \"Ligges\", role=\"ctb\"))",
       "Maintainer": "David Scott <d.scott@auckland.ac.nz>",
       "Imports": [
         "stats",
-        "utils",
-        "methods"
+        "utils"
       ],
       "Suggests": [
         "knitr",
+        "plm",
         "zoo",
-        "survival",
-        "glue",
-        "tinytex"
+        "survival"
       ],
       "VignetteBuilder": "knitr",
       "Description": "Coerce data to LaTeX and HTML tables.",

app_docker/translations/translation_da.csv

@@ -1,6 +1,9 @@
 "en","da"
 "Hello","Hej"
 "Get started","Kom i gang"
+"File upload","Upload fil"
+"REDCap server export","Eksport fra REDCap server"
+"Local or sample data","Lokal eller testdata"
 "Please be mindfull handling sensitive data","Pas godt på og overvej nøje hvordan du håndterer personfølsomme data"
 "Quick overview","Hurtigt overblik"
 "Select variables for final import","Vælg variabler til den endelige import"
@@ -129,6 +132,7 @@
 "Coefficients plot","Koefficientgraf"
 "Checks","Test af model"
 "Browse observations","Gennemse observationer"
+"Settings","Indstillinger"
 "The following error occured on determining correlations:","Følgende fejl opstod i forbindelse med korrelationsanalysen:"
 "No missing observations","Ingen manglende observationer"
 "There is a total of {p_miss} % missing observations.","Der er i alt {p_miss} % manglende observationer."
@@ -141,7 +145,15 @@
 "Missings","Manglende observationer"
 "Class","Klasse"
 "Observations","Observationer"
+"Data classes and missing observations","Dataklasser og manglende observationer"
+"Sure you want to reset data? This cannot be undone.","Er du sikker på at du vil gendanne data? Det kan ikke fortrydes."
 "Cancel","Afbryd"
+"Confirm","Bekræft"
+"The filtered data","Filtreret data"
+"Create new factor","Ny kategorisk variabel"
+"Create new variables","Opret nye variabler"
+"Select data types to include","Vælg datatyper, der skal inkluderes"
+"Uploaded data overview","Overblik over uploaded data"
 "Specify covariables","Angiv kovariabler"
 "If none are selected, all are included.","Hvis ingen er valgt inkluderes alle."
 "Analyse","Analysér"
@@ -149,6 +161,7 @@
 "Press 'Analyse' to create the regression model and after changing parameters.","Tryk 'Analysér' for at danne regressionsmodel og for at opdatere hvis parametre ændres."
 "Show p-value","Vis p-værdi"
 "Model checks","Model-test"
+"Please confirm data reset!","Bekræft gendannelse af data!"
 "Import data from REDCap","Importér data fra REDCap"
 "REDCap server","REDCap-server"
 "Web address","Serveradresse"
@@ -197,7 +210,18 @@
 "Multivariable regression model checks","Tests af multivariabel regressionsmodel"
 "Grouped by {get_label(data,ter)}","Grupperet efter {get_label(data,ter)}"
 "Option to perform statistical comparisons between strata in baseline table.","Mulighed for at udføre statistiske tests mellem strata i oversigtstabellen."
+"The data includes {n_col} variables. Please limit to 100.","Data indeholder {n_col} variabler. Begræns venligst til 100."
+"Data import","Data import"
+"Data import formatting","Formatering af data ved import"
+"Data modifications","Ændringer af data"
+"Variables filter","Variables filter"
+"Data filter","Data filter"
+"Data characteristics table","Oversigtstabel"
+"The dataset without text variables","Datasættet uden variabler formateret som tekst"
+"Creating the table. Hold on for a moment..","Opretter tabellen. Vent et øjeblik.."
 "Generating the report. Hold on for a moment..","Opretter rapporten. Vent et øjeblik.."
+"We encountered the following error showing missingness:","Under analysen af manglende observationer opstod følgende fejl:"
+"We encountered the following error browsing your data:","I forsøget på at vise en dataoversigt opstod følgende fejl:"
 "Choose a name for the column to be created or modified, then enter an expression before clicking on the button below to create the variable, or cancel to exit without saving anything.","Vælg et navn til den nye variabel, skriv din formel og tryk så på knappen for at gemme variablen, eller annuler for at lukke uden at gemme."
 "Please fill in web address and API token, then press 'Connect'.","Udfyld serveradresse og API-nøgle, og tryk så 'Fobind'."
 "Other","Other"
@@ -230,12 +254,16 @@
 "Browse data preview","Forhåndsvisning af resultat"
 "Split character string","Opdel tegnstreng"
 "Split text","Opdel tekst"
+"Split a character string by a common delimiter","Opdel en tekstkolonne med en fælles afgrænser"
 "Apply split","Anvend opdeling"
 "Stacked relative barplot","Stablet relativt søjlediagram"
 "Create relative stacked barplots to show the distribution of categorical levels","Opret relative stablede søjlediagrammer for at vise fordelingen af kategoriske niveauer"
 "Side-by-side barplot","Side om side barplot"
 "Create side-by-side barplot to show the distribution of categorical levels","Opret et side-om-side søjlediagram for at vise fordelingen af kategoriske niveauer"
 "Select table theme","Vælg tema"
+"Level of detail","Detaljeniveau"
+"Minimal","Minimal"
+"Extensive","Stor"
 "Letters","Bogstaver"
 "Words","Ord"
 "Shorten to first letters","Afkort til første bogstaver"
@@ -284,6 +312,7 @@
 "When you need more advanced tools, you'll be prepared to use R directly.","Når du har brug for mere avancerede værktøjer, vil du være forberedt på at bruge R direkte."
 "The app contains a selelct number of features and will guide you through key analyses.","Appen indeholder udvalgte funktioner, og guider dig gennem de vigtigste analyser."
 "Sort by Levels","Sorter efter niveauer"
+"Reorder factor levels","Omarranger niveauer"
 "Modify factor levels","Ændr kategoriske niveauer"
 "Reorder or rename the levels of factor/categorical variables.","Ændr navn eller rækkefølge på kategorisk variabel."
 "Maximum number of observations:","Maximale antal observationer:"
@@ -297,34 +326,5 @@
 "No data present.","Ingen data tilstede."
 "You have provided a complete dataset with no missing values.","Data er uden manglende observationer."
 "Start by loading data.","Start med at vælge data."
+"Sample data","Træningsdata"
 "Create a new variable; otherwise replaces (Updating labels always creates new variable)","Create a new variable; otherwise replaces (Updating labels always creates new variable)"
-"Data classes and missing observations","Data classes and missing observations"
-"We encountered the following error showing missingness:","We encountered the following error showing missingness:"
-"Please confirm data reset!","Please confirm data reset!"
-"Sure you want to reset data? This cannot be undone.","Sure you want to reset data? This cannot be undone."
-"Confirm","Confirm"
-"The filtered data","The filtered data"
-"Reorder factor levels","Reorder factor levels"
-"Split a character string by a common delimiter","Split a character string by a common delimiter"
-"Create new variables","Create new variables"
-"Select data types to include","Select data types to include"
-"Uploaded data overview","Uploaded data overview"
-"We encountered the following error browsing your data:","We encountered the following error browsing your data:"
-"Data import","Data import"
-"Data import formatting","Data import formatting"
-"Data modifications","Data modifications"
-"Variables filter","Variables filter"
-"Data filter","Data filter"
-"Data characteristics table","Data characteristics table"
-"Level of detail","Level of detail"
-"Minimal","Minimal"
-"Extensive","Extensive"
-"The dataset without text variables","The dataset without text variables"
-"The data includes {n_col} variables. Please limit to 100.","The data includes {n_col} variables. Please limit to 100."
-"Creating the table. Hold on for a moment..","Creating the table. Hold on for a moment.."
-"File upload","File upload"
-"REDCap server export","REDCap server export"
-"Local or sample data","Local or sample data"
-"Sample data","Sample data"
-"Settings","Settings"
-"Create new factor","Create new factor"

app_docker/translations/translation_sw.csv

@@ -1,6 +1,9 @@
 "en","sw"
 "Hello","Habari"
 "Get started","Tuanze!"
+"File upload","Upakiaji wa faili"
+"REDCap server export","Usafirishaji wa seva ya REDCap"
+"Local or sample data","Data ya ndani au ya sampuli"
 "Please be mindfull handling sensitive data","Tafadhali kuwa mwangalifu kushughulikia data nyeti"
 "Quick overview","Muhtasari wa haraka"
 "Select variables for final import","Chagua vigezo vya kuingiza mwisho"
@@ -129,6 +132,7 @@
 "Coefficients plot","Mchoro wa viambato"
 "Checks","Hundi"
 "Browse observations","Vinjari uchunguzi"
+"Settings","Mipangilio"
 "The following error occured on determining correlations:","Hitilafu ifuatayo ilitokea katika kubaini uhusiano:"
 "No missing observations","Hakuna uchunguzi unaokosekana"
 "There is a total of {p_miss} % missing observations.","Kuna jumla ya uchunguzi wa {p_miss}% unaokosekana."
@@ -141,7 +145,15 @@
 "Missings","Hazipo"
 "Class","Darasa"
 "Observations","Uchunguzi"
+"Data classes and missing observations","Madarasa ya data na uchunguzi unaokosekana"
+"Sure you want to reset data? This cannot be undone.","Una uhakika unataka kuweka upya data? Hii haiwezi kutenduliwa."
 "Cancel","Ghairi"
+"Confirm","Thibitisha"
+"The filtered data","Data iliyochujwa"
+"Create new factor","Unda kipengele kipya"
+"Create new variables","Unda vigezo vipya"
+"Select data types to include","Chagua aina za data za kujumuisha"
+"Uploaded data overview","Muhtasari wa data iliyopakiwa"
 "Specify covariables","Bainisha vigeu vinavyoweza kuunganishwa"
 "If none are selected, all are included.","Ikiwa hakuna aliyechaguliwa, wote wamejumuishwa."
 "Analyse","Changanua"
@@ -149,6 +161,7 @@
 "Press 'Analyse' to create the regression model and after changing parameters.","Bonyeza 'Changanua' ili kuunda modeli ya urejeshaji na baada ya kubadilisha vigezo."
 "Show p-value","Onyesha thamani ya p"
 "Model checks","Ukaguzi wa modeli"
+"Please confirm data reset!","Tafadhali thibitisha urejeshaji wa data!"
 "Import data from REDCap","Ingiza data kutoka REDCap"
 "REDCap server","Seva ya REDCap"
 "Web address","Anwani ya wavuti"
@@ -197,7 +210,18 @@
 "Multivariable regression model checks","Ukaguzi wa modeli ya urejeshaji unaoweza kubadilika-badilika"
 "Grouped by {get_label(data,ter)}","Imepangwa kwa makundi kulingana na {get_label(data,ter)}"
 "Option to perform statistical comparisons between strata in baseline table.","Chaguo la kufanya ulinganisho wa takwimu kati ya tabaka katika jedwali la msingi."
+"The data includes {n_col} variables. Please limit to 100.","Data inajumuisha vigezo vya {n_col}. Tafadhali punguza hadi 100."
+"Data import","Uingizaji wa data"
+"Data import formatting","Uumbizaji wa kuingiza data"
+"Data modifications","Marekebisho ya data"
+"Variables filter","Kichujio cha vigeugeu"
+"Data filter","Kichujio cha data"
+"Data characteristics table","Jedwali la sifa za data"
+"The dataset without text variables","Seti ya data bila vigeu vya maandishi"
+"Creating the table. Hold on for a moment..","Kutengeneza meza. Subiri kwa muda.."
 "Generating the report. Hold on for a moment..","Inazalisha ripoti. Subiri kidogo.."
+"We encountered the following error showing missingness:","Tulikutana na hitilafu ifuatayo inayoonyesha ukosefu:"
+"We encountered the following error browsing your data:","Tulipata hitilafu ifuatayo wakati wa kuvinjari data yako:"
 "Choose a name for the column to be created or modified, then enter an expression before clicking on the button below to create the variable, or cancel to exit without saving anything.","Chagua jina la safu wima itakayoundwa au kurekebishwa, kisha ingiza usemi kabla ya kubofya kitufe kilicho hapa chini ili kuunda kigezo, au ghairi ili kutoka bila kuhifadhi chochote."
 "Other","Nyingine"
 "Hour of the day","Saa ya siku"
@@ -225,6 +249,7 @@
 "Split string to multiple observations (rows) in the same column. Also ads id and instance columns","Gawanya mfuatano katika uchunguzi mwingi (safu) katika safu wima moja. Pia vitambulisho vya matangazo na safu wima za mfano"
 "Split character string","Gawanya mfuatano wa herufi"
 "Split text","Gawanya maandishi"
+"Split a character string by a common delimiter","Gawanya mfuatano wa herufi kwa kitenganishi cha kawaida"
 "Select delimiter","Chagua kidhibiti"
 "Browse data preview","Vinjari hakikisho la data"
 "Original data","Data asili"
@@ -236,6 +261,9 @@
 "Side-by-side barplot","Kipande cha baruni cha kando kwa kando"
 "Create side-by-side barplot to show the distribution of categorical levels","Unda mpangilio wa barufa kando ili kuonyesha usambazaji wa viwango vya kategoria"
 "Select table theme","Chagua mandhari ya jedwali"
+"Level of detail","Kiwango cha maelezo"
+"Minimal","Kidogo"
+"Extensive","Kina"
 "Letters","Barua"
 "Words","Maneno"
 "Shorten to first letters","Fupisha herufi za kwanza"
@@ -284,6 +312,7 @@
 "When you need more advanced tools, you'll be prepared to use R directly.","Unapohitaji zana za hali ya juu zaidi, utakuwa tayari kutumia R moja kwa moja."
 "The app contains a selelct number of features and will guide you through key analyses.","The app contains a selelct number of features and will guide you through key analyses."
 "Sort by Levels","Sort by Levels"
+"Reorder factor levels","Reorder factor levels"
 "Modify factor levels","Modify factor levels"
 "Reorder or rename the levels of factor/categorical variables.","Reorder or rename the levels of factor/categorical variables."
 "Maximum number of observations:","Maximum number of observations:"
@@ -297,34 +326,5 @@
 "No data present.","No data present."
 "You have provided a complete dataset with no missing values.","You have provided a complete dataset with no missing values."
 "Start by loading data.","Start by loading data."
-"Create a new variable; otherwise replaces (Updating labels always creates new variable)","Create a new variable; otherwise replaces (Updating labels always creates new variable)"
-"Data classes and missing observations","Data classes and missing observations"
-"We encountered the following error showing missingness:","We encountered the following error showing missingness:"
-"Please confirm data reset!","Please confirm data reset!"
-"Sure you want to reset data? This cannot be undone.","Sure you want to reset data? This cannot be undone."
-"Confirm","Confirm"
-"The filtered data","The filtered data"
-"Reorder factor levels","Reorder factor levels"
-"Split a character string by a common delimiter","Split a character string by a common delimiter"
-"Create new variables","Create new variables"
-"Select data types to include","Select data types to include"
-"Uploaded data overview","Uploaded data overview"
-"We encountered the following error browsing your data:","We encountered the following error browsing your data:"
-"Data import","Data import"
-"Data import formatting","Data import formatting"
-"Data modifications","Data modifications"
-"Variables filter","Variables filter"
-"Data filter","Data filter"
-"Data characteristics table","Data characteristics table"
-"Level of detail","Level of detail"
-"Minimal","Minimal"
-"Extensive","Extensive"
-"The dataset without text variables","The dataset without text variables"
-"The data includes {n_col} variables. Please limit to 100.","The data includes {n_col} variables. Please limit to 100."
-"Creating the table. Hold on for a moment..","Creating the table. Hold on for a moment.."
-"File upload","File upload"
-"REDCap server export","REDCap server export"
-"Local or sample data","Local or sample data"
 "Sample data","Sample data"
-"Settings","Settings"
-"Create new factor","Create new factor"
+"Create a new variable; otherwise replaces (Updating labels always creates new variable)","Create a new variable; otherwise replaces (Updating labels always creates new variable)"

inst/apps/FreesearchR/app.R

@@ -1,7 +1,7 @@
 
 
 ########
-#### Current file: /var/folders/9l/xbc19wxx0g79jdd2sf_0v291mhwh7f/T//RtmpmhqokQ/file1a147dcf977e.R 
+#### Current file: /var/folders/9l/xbc19wxx0g79jdd2sf_0v291mhwh7f/T//RtmpxB1KWR/file173c978fea931.R 
 ########
 
 i18n_path <- system.file("translations", package = "FreesearchR")
@@ -45,7 +45,8 @@ library(rlang)
 library(shiny.i18n)
 library(fontawesome)
 
-# print(list.files("www/fonts/montserrat", full.names = TRUE))
+print(list.files("www/fonts/montserrat", full.names = TRUE))
+
 
 ## Translation init
 i18n <- shiny.i18n::Translator$new(translation_csvs_path = i18n_path)
@@ -53,6 +54,16 @@ i18n <- shiny.i18n::Translator$new(translation_csvs_path = i18n_path)
 # i18n <- shiny.i18n::Translator$new(translation_csvs_path = here::here("inst/translations/"))
 i18n$set_translation_language("en")
 
+## Global freesearchR vars
+if (!"global_freesearchR" %in% ls(name = globalenv())) {
+  global_freesearchR <- list(
+    include_globalenv = FALSE,
+    data_limit_default = 1000,
+    data_limit_upper = 10000,
+    data_limit_lower = 1
+  )
+}
+
 
 ########
 #### Current file: /Users/au301842/FreesearchR/app/functions.R 
@@ -64,7 +75,7 @@ i18n$set_translation_language("en")
 #### Current file: /Users/au301842/FreesearchR/R//app_version.R 
 ########
 
-app_version <- function()'26.3.3'
+app_version <- function()'26.3.2'
 
 
 ########
@@ -2957,7 +2968,7 @@ add_sparkline <- function(grid, column = "vals", color.main = "#2a8484", color.s
         type <- "line"
         ds <- data.frame(x = NA, y = NA)
         horizontal <- FALSE
-      } else if ("factor" %in% data_cl) {
+      } else if (identical(data_cl, "factor")) {
         type <- "column"
         s <- summary(data)
         ds <- data.frame(x = names(s), y = s)
@@ -3887,23 +3898,20 @@ file_export <- function(data,
 #'   head(5) |>
 #'   str()
 default_parsing <- function(data) {
-  # name_labels <- lapply(data, \(.x) REDCapCAST::get_attr(.x, attr = "label"))
+  name_labels <- lapply(data, \(.x) REDCapCAST::get_attr(.x, attr = "label"))
   # browser()
-  with_labels(data,{
-    data |>
-      setNames(make.names(names(data), unique = TRUE)) |>
-      ## Temporary step to avoid nested list and crashing
-      remove_nested_list() |>
-      REDCapCAST::parse_data() |>
-      REDCapCAST::as_factor() |>
-      REDCapCAST::numchar2fct(numeric.threshold = 8,
-                              character.throshold = 10) |>
-      REDCapCAST::as_logical() |>
-      REDCapCAST::fct_drop()
-  })
-  # out <-
-  #
-  # set_column_label(out, setNames(name_labels, names(out)), overwrite = FALSE)
+  out <- data |>
+    setNames(make.names(names(data), unique = TRUE)) |>
+    ## Temporary step to avoid nested list and crashing
+    remove_nested_list() |>
+    REDCapCAST::parse_data() |>
+    REDCapCAST::as_factor() |>
+    REDCapCAST::numchar2fct(numeric.threshold = 8,
+                            character.throshold = 10) |>
+    REDCapCAST::as_logical() |>
+    REDCapCAST::fct_drop()
+
+  set_column_label(out, setNames(name_labels, names(out)), overwrite = FALSE)
 
   # purrr::map2(
   #   out,
@@ -4027,28 +4035,33 @@ missing_fraction <- function(data) {
 #'   sample(c(1:8, NA), 20, TRUE)
 #' ) |> data_description()
 data_description <- function(data, data_text = "Data") {
-  # Resolve reactive once
-  if (shiny::is.reactive(data)) data <- data()
-
-  # Early return if null
-  if (is.null(data)) return(i18n$t("No data present."))
+  data <- if (shiny::is.reactive(data))
+    data()
+  else
+    data
 
   n <- nrow(data)
-
-  # Early return if empty
-  if (n == 0L) return(i18n$t("No data present."))
-
   n_var <- ncol(data)
-
-  # Faster complete.cases alternative using rowSums on NA matrix
-  n_complete <- n - sum(rowSums(is.na(data)) > 0L)
+  n_complete <- sum(complete.cases(data))
   p_complete <- signif(100 * n_complete / n, 3)
 
-  glue::glue(
-    i18n$t(
-      "{data_text} has {n} observations and {n_var} variables, with {n_complete} ({p_complete} %) complete cases."
+  if (is.null(data)) {
+    i18n$t("No data present.")
+  } else {
+    glue::glue(
+      i18n$t(
+        "{data_text} has {n} observations and {n_var} variables, with {n_complete} ({p_complete} %) complete cases."
+      )
     )
-  )
+  }
+  # sprintf(
+  #   "%s has %s observations and %s variables, with %s (%s%%) complete cases.",
+  #   data_text,
+  #   n,
+  #   n_var,
+  #   n_complete,
+  #   p_complete
+  # )
 }
 
 
@@ -4514,7 +4527,7 @@ data_types <- function() {
 #### Current file: /Users/au301842/FreesearchR/R//hosted_version.R 
 ########
 
-hosted_version <- function()'v26.3.3-260312'
+hosted_version <- function()'v26.3.2-260311'
 
 
 ########
@@ -5974,16 +5987,16 @@ landing_page_ui <- function(i18n) {
 #' data(mtcars)
 #' launch_FreesearchR(launch.browser = TRUE)
 #' }
-launch_FreesearchR <- function(include_globalenv = TRUE,
+launch_FreesearchR <- function(inlcude_globalenv = TRUE,
                                data_limit_default = 1000,
                                data_limit_upper = 100000,
                                data_limit_lower = 1,
                                ...) {
-  Sys.setenv(
-    INCLUDE_GLOBALENV = include_globalenv,
-    DATA_LIMIT_DEFAULT = data_limit_default,
-    DATA_LIMIT_UPPER = data_limit_upper,
-    DATA_LIMIT_LOWER = data_limit_lower
+  global_freesearchR <- list(
+    include_globalenv = include_globalenv,
+    data_limit_default = data_limit_default,
+    data_limit_upper = data_limit_upper,
+    data_limit_lower = data_limit_lower
   )
 
   appDir <- system.file("apps", "FreesearchR", package = "FreesearchR")
@@ -5997,123 +6010,6 @@ launch_FreesearchR <- function(include_globalenv = TRUE,
 }
 
 
-## Helper to set env variables
-get_config <- function(var_name, default = NULL) {
-  val <- Sys.getenv(var_name, unset = NA_character_)
-
-  # Only use env var if it is explicitly set and non-empty
-  if (!is.na(val) && nzchar(trimws(val))) {
-    if (is.logical(default)) return(to_logical(val))
-    if (is.numeric(default)) return(as.numeric(val))
-    return(val)
-  }
-
-  if (!is.null(default)) {
-    return(default)
-  }
-
-  stop(paste("Required config variable not set:", var_name))
-}
-
-to_logical <- function(x) {
-  result <- switch(tolower(trimws(as.character(x))),
-                   "true"  = , "1" = , "yes" = TRUE,
-                   "false" = , "0" = , "no"  = FALSE,
-                   NA
-  )
-  if (is.na(result)) stop(paste("Cannot coerce to logical:", x))
-  result
-}
-
-
-## File loader - based on the module, uses hard coded default values
-load_file <- function(path) {
-  read_fns <- list(
-    ods  = "import_ods",
-    dta  = "import_dta",
-    csv  = "import_delim",
-    tsv  = "import_delim",
-    txt  = "import_delim",
-    xls  = "import_xls",
-    xlsx = "import_xls",
-    rds  = "import_rds"
-  )
-
-  ext <- tolower(tools::file_ext(path))
-
-  if (!ext %in% names(read_fns)) {
-    message("Unsupported file type, skipping: ", basename(path), " (.", ext, ")")
-    return(NULL)
-  }
-
-  read_fn <- read_fns[[ext]]
-
-  parameters <- list(
-    file     = path,
-    sheet    = 1,
-    skip     = 0,
-    dec      = ".",
-    encoding = "unknown"
-  )
-
-  # Trim parameters to only those accepted by the target function
-  parameters <- parameters[which(names(parameters) %in% rlang::fn_fmls_names(get(read_fn)))]
-
-  result <- tryCatch(
-    rlang::exec(read_fn, !!!parameters),
-    error = function(e) {
-      # Fall back to rio::import
-      message("Primary loader failed for ", basename(path), ", trying rio::import")
-      tryCatch(
-        rio::import(path),
-        error = function(e2) {
-          message("Failed to load ", basename(path), ": ", e2$message)
-          NULL
-        }
-      )
-    }
-  )
-
-  if (!is.null(result) && NROW(result) < 1) {
-    message("File loaded but contains no rows, skipping: ", basename(path))
-    return(NULL)
-  }
-
-  result
-}
-
-
-load_folder <- function(folder = "/app/data", envir = .GlobalEnv) {
-  if (is.null(folder) || !dir.exists(folder)) {
-    message("No data folder found, skipping load")
-    return(invisible(NULL))
-  }
-
-  files <- list.files(folder, full.names = TRUE)
-  if (length(files) == 0) {
-    message("Data folder is empty, skipping load")
-    return(invisible(NULL))
-  }
-
-  loaded <- vapply(files, function(file) {
-    result <- load_file(file)
-    if (is.null(result))
-      return(FALSE)
-    name <- tools::file_path_sans_ext(basename(file))
-    assign(name, default_parsing(result), envir = envir)
-    TRUE
-  }, logical(1))
-
-  message(sprintf(
-    "Loaded %d/%d files from %s",
-    sum(loaded),
-    length(files),
-    folder
-  ))
-  invisible(loaded)
-}
-
-
 ########
 #### Current file: /Users/au301842/FreesearchR/R//missings-module.R 
 ########
@@ -10830,9 +10726,9 @@ ui_elements <- function(selection) {
               layout_params = "dropdown",
               # title = "Choose a datafile to upload",
               file_extensions = c(".csv", ".tsv", ".txt", ".xls", ".xlsx", ".rds", ".ods", ".dta"),
-              limit_default = DATA_LIMIT_DEFAULT,
-              limit_lower = DATA_LIMIT_LOWER,
-              limit_upper = DATA_LIMIT_UPPER
+              limit_default = global_freesearchR$data_limit_default,
+              limit_lower = global_freesearchR$data_limit_lower,
+              limit_upper = global_freesearchR$data_limit_upper
 
             )
           ),
@@ -10854,7 +10750,7 @@ ui_elements <- function(selection) {
               id = "env",
               title = NULL,
               packages = c("NHANES", "stRoke", "datasets", "MASS"),
-              globalenv = isTruthy(INCLUDE_GLOBALENV)
+              globalenv = global_freesearchR$include_globalenv
             )
           ),
           # shiny::conditionalPanel(
@@ -13705,28 +13601,6 @@ dev_banner <- function(){
       }
 
 
-########
-#### Current file: /Users/au301842/FreesearchR/app/globals.R 
-########
-
-## Setting global variables
-INCLUDE_GLOBALENV <- get_config("INCLUDE_GLOBALENV", default = FALSE)
-DATA_LIMIT_DEFAULT <- get_config("DATA_LIMIT_DEFAULT", default = 10000)
-DATA_LIMIT_UPPER <- get_config("DATA_LIMIT_UPPER", default = 100000)
-DATA_LIMIT_LOWER <- get_config("DATA_LIMIT_LOWER", default = 1)
-
-## Loads folder passed to the docker container and mounted as below:
-##
-##    services:
-##      shiny:
-##        image: your-shiny-app
-##      volumes:
-##        - ./data:/app/data:ro
-##
-##  All files in the ./data/ folder is attempted loaded
-load_folder()
-
-
 ########
 #### Current file: /Users/au301842/FreesearchR/app/ui.R 
 ########
@@ -13924,9 +13798,9 @@ server <- function(input, output, session) {
     #   selected = "file"
     # )
 
-    if (isTruthy(INCLUDE_GLOBALENV)) {
+    if (isTRUE(global_freesearchR$include_globalenv)) {
       env_label <- i18n$t("Local or sample data")
-      output$data_sample_text <- shiny::renderUI(shiny::helpText(
+      output$data_sample_text <- shiny::renderText(shiny::helpText(
         i18n$t(
           "Upload a file, get data directly from REDCap or use local or sample data."
         )
@@ -14019,7 +13893,7 @@ server <- function(input, output, session) {
     trigger_return = "change",
     btn_show_data = FALSE,
     reset = reactive(input$hidden),
-    limit_data = DATA_LIMIT_UPPER
+    limit_data = global_freesearchR$data_limit_upper
   )
 
   shiny::observeEvent(from_env$data(), {

inst/translations/translation_da.csv

@@ -1,6 +1,9 @@
 "en","da"
 "Hello","Hej"
 "Get started","Kom i gang"
+"File upload","Upload fil"
+"REDCap server export","Eksport fra REDCap server"
+"Local or sample data","Lokal eller testdata"
 "Please be mindfull handling sensitive data","Pas godt på og overvej nøje hvordan du håndterer personfølsomme data"
 "Quick overview","Hurtigt overblik"
 "Select variables for final import","Vælg variabler til den endelige import"
@@ -129,6 +132,7 @@
 "Coefficients plot","Koefficientgraf"
 "Checks","Test af model"
 "Browse observations","Gennemse observationer"
+"Settings","Indstillinger"
 "The following error occured on determining correlations:","Følgende fejl opstod i forbindelse med korrelationsanalysen:"
 "No missing observations","Ingen manglende observationer"
 "There is a total of {p_miss} % missing observations.","Der er i alt {p_miss} % manglende observationer."
@@ -141,7 +145,15 @@
 "Missings","Manglende observationer"
 "Class","Klasse"
 "Observations","Observationer"
+"Data classes and missing observations","Dataklasser og manglende observationer"
+"Sure you want to reset data? This cannot be undone.","Er du sikker på at du vil gendanne data? Det kan ikke fortrydes."
 "Cancel","Afbryd"
+"Confirm","Bekræft"
+"The filtered data","Filtreret data"
+"Create new factor","Ny kategorisk variabel"
+"Create new variables","Opret nye variabler"
+"Select data types to include","Vælg datatyper, der skal inkluderes"
+"Uploaded data overview","Overblik over uploaded data"
 "Specify covariables","Angiv kovariabler"
 "If none are selected, all are included.","Hvis ingen er valgt inkluderes alle."
 "Analyse","Analysér"
@@ -149,6 +161,7 @@
 "Press 'Analyse' to create the regression model and after changing parameters.","Tryk 'Analysér' for at danne regressionsmodel og for at opdatere hvis parametre ændres."
 "Show p-value","Vis p-værdi"
 "Model checks","Model-test"
+"Please confirm data reset!","Bekræft gendannelse af data!"
 "Import data from REDCap","Importér data fra REDCap"
 "REDCap server","REDCap-server"
 "Web address","Serveradresse"
@@ -197,7 +210,18 @@
 "Multivariable regression model checks","Tests af multivariabel regressionsmodel"
 "Grouped by {get_label(data,ter)}","Grupperet efter {get_label(data,ter)}"
 "Option to perform statistical comparisons between strata in baseline table.","Mulighed for at udføre statistiske tests mellem strata i oversigtstabellen."
+"The data includes {n_col} variables. Please limit to 100.","Data indeholder {n_col} variabler. Begræns venligst til 100."
+"Data import","Data import"
+"Data import formatting","Formatering af data ved import"
+"Data modifications","Ændringer af data"
+"Variables filter","Variables filter"
+"Data filter","Data filter"
+"Data characteristics table","Oversigtstabel"
+"The dataset without text variables","Datasættet uden variabler formateret som tekst"
+"Creating the table. Hold on for a moment..","Opretter tabellen. Vent et øjeblik.."
 "Generating the report. Hold on for a moment..","Opretter rapporten. Vent et øjeblik.."
+"We encountered the following error showing missingness:","Under analysen af manglende observationer opstod følgende fejl:"
+"We encountered the following error browsing your data:","I forsøget på at vise en dataoversigt opstod følgende fejl:"
 "Choose a name for the column to be created or modified, then enter an expression before clicking on the button below to create the variable, or cancel to exit without saving anything.","Vælg et navn til den nye variabel, skriv din formel og tryk så på knappen for at gemme variablen, eller annuler for at lukke uden at gemme."
 "Please fill in web address and API token, then press 'Connect'.","Udfyld serveradresse og API-nøgle, og tryk så 'Fobind'."
 "Other","Other"
@@ -230,12 +254,16 @@
 "Browse data preview","Forhåndsvisning af resultat"
 "Split character string","Opdel tegnstreng"
 "Split text","Opdel tekst"
+"Split a character string by a common delimiter","Opdel en tekstkolonne med en fælles afgrænser"
 "Apply split","Anvend opdeling"
 "Stacked relative barplot","Stablet relativt søjlediagram"
 "Create relative stacked barplots to show the distribution of categorical levels","Opret relative stablede søjlediagrammer for at vise fordelingen af kategoriske niveauer"
 "Side-by-side barplot","Side om side barplot"
 "Create side-by-side barplot to show the distribution of categorical levels","Opret et side-om-side søjlediagram for at vise fordelingen af kategoriske niveauer"
 "Select table theme","Vælg tema"
+"Level of detail","Detaljeniveau"
+"Minimal","Minimal"
+"Extensive","Stor"
 "Letters","Bogstaver"
 "Words","Ord"
 "Shorten to first letters","Afkort til første bogstaver"
@@ -284,6 +312,7 @@
 "When you need more advanced tools, you'll be prepared to use R directly.","Når du har brug for mere avancerede værktøjer, vil du være forberedt på at bruge R direkte."
 "The app contains a selelct number of features and will guide you through key analyses.","Appen indeholder udvalgte funktioner, og guider dig gennem de vigtigste analyser."
 "Sort by Levels","Sorter efter niveauer"
+"Reorder factor levels","Omarranger niveauer"
 "Modify factor levels","Ændr kategoriske niveauer"
 "Reorder or rename the levels of factor/categorical variables.","Ændr navn eller rækkefølge på kategorisk variabel."
 "Maximum number of observations:","Maximale antal observationer:"
@@ -297,34 +326,5 @@
 "No data present.","Ingen data tilstede."
 "You have provided a complete dataset with no missing values.","Data er uden manglende observationer."
 "Start by loading data.","Start med at vælge data."
+"Sample data","Træningsdata"
 "Create a new variable; otherwise replaces (Updating labels always creates new variable)","Create a new variable; otherwise replaces (Updating labels always creates new variable)"
-"Data classes and missing observations","Data classes and missing observations"
-"We encountered the following error showing missingness:","We encountered the following error showing missingness:"
-"Please confirm data reset!","Please confirm data reset!"
-"Sure you want to reset data? This cannot be undone.","Sure you want to reset data? This cannot be undone."
-"Confirm","Confirm"
-"The filtered data","The filtered data"
-"Reorder factor levels","Reorder factor levels"
-"Split a character string by a common delimiter","Split a character string by a common delimiter"
-"Create new variables","Create new variables"
-"Select data types to include","Select data types to include"
-"Uploaded data overview","Uploaded data overview"
-"We encountered the following error browsing your data:","We encountered the following error browsing your data:"
-"Data import","Data import"
-"Data import formatting","Data import formatting"
-"Data modifications","Data modifications"
-"Variables filter","Variables filter"
-"Data filter","Data filter"
-"Data characteristics table","Data characteristics table"
-"Level of detail","Level of detail"
-"Minimal","Minimal"
-"Extensive","Extensive"
-"The dataset without text variables","The dataset without text variables"
-"The data includes {n_col} variables. Please limit to 100.","The data includes {n_col} variables. Please limit to 100."
-"Creating the table. Hold on for a moment..","Creating the table. Hold on for a moment.."
-"File upload","File upload"
-"REDCap server export","REDCap server export"
-"Local or sample data","Local or sample data"
-"Sample data","Sample data"
-"Settings","Settings"
-"Create new factor","Create new factor"

inst/translations/translation_sw.csv

@@ -1,6 +1,9 @@
 "en","sw"
 "Hello","Habari"
 "Get started","Tuanze!"
+"File upload","Upakiaji wa faili"
+"REDCap server export","Usafirishaji wa seva ya REDCap"
+"Local or sample data","Data ya ndani au ya sampuli"
 "Please be mindfull handling sensitive data","Tafadhali kuwa mwangalifu kushughulikia data nyeti"
 "Quick overview","Muhtasari wa haraka"
 "Select variables for final import","Chagua vigezo vya kuingiza mwisho"
@@ -129,6 +132,7 @@
 "Coefficients plot","Mchoro wa viambato"
 "Checks","Hundi"
 "Browse observations","Vinjari uchunguzi"
+"Settings","Mipangilio"
 "The following error occured on determining correlations:","Hitilafu ifuatayo ilitokea katika kubaini uhusiano:"
 "No missing observations","Hakuna uchunguzi unaokosekana"
 "There is a total of {p_miss} % missing observations.","Kuna jumla ya uchunguzi wa {p_miss}% unaokosekana."
@@ -141,7 +145,15 @@
 "Missings","Hazipo"
 "Class","Darasa"
 "Observations","Uchunguzi"
+"Data classes and missing observations","Madarasa ya data na uchunguzi unaokosekana"
+"Sure you want to reset data? This cannot be undone.","Una uhakika unataka kuweka upya data? Hii haiwezi kutenduliwa."
 "Cancel","Ghairi"
+"Confirm","Thibitisha"
+"The filtered data","Data iliyochujwa"
+"Create new factor","Unda kipengele kipya"
+"Create new variables","Unda vigezo vipya"
+"Select data types to include","Chagua aina za data za kujumuisha"
+"Uploaded data overview","Muhtasari wa data iliyopakiwa"
 "Specify covariables","Bainisha vigeu vinavyoweza kuunganishwa"
 "If none are selected, all are included.","Ikiwa hakuna aliyechaguliwa, wote wamejumuishwa."
 "Analyse","Changanua"
@@ -149,6 +161,7 @@
 "Press 'Analyse' to create the regression model and after changing parameters.","Bonyeza 'Changanua' ili kuunda modeli ya urejeshaji na baada ya kubadilisha vigezo."
 "Show p-value","Onyesha thamani ya p"
 "Model checks","Ukaguzi wa modeli"
+"Please confirm data reset!","Tafadhali thibitisha urejeshaji wa data!"
 "Import data from REDCap","Ingiza data kutoka REDCap"
 "REDCap server","Seva ya REDCap"
 "Web address","Anwani ya wavuti"
@@ -197,7 +210,18 @@
 "Multivariable regression model checks","Ukaguzi wa modeli ya urejeshaji unaoweza kubadilika-badilika"
 "Grouped by {get_label(data,ter)}","Imepangwa kwa makundi kulingana na {get_label(data,ter)}"
 "Option to perform statistical comparisons between strata in baseline table.","Chaguo la kufanya ulinganisho wa takwimu kati ya tabaka katika jedwali la msingi."
+"The data includes {n_col} variables. Please limit to 100.","Data inajumuisha vigezo vya {n_col}. Tafadhali punguza hadi 100."
+"Data import","Uingizaji wa data"
+"Data import formatting","Uumbizaji wa kuingiza data"
+"Data modifications","Marekebisho ya data"
+"Variables filter","Kichujio cha vigeugeu"
+"Data filter","Kichujio cha data"
+"Data characteristics table","Jedwali la sifa za data"
+"The dataset without text variables","Seti ya data bila vigeu vya maandishi"
+"Creating the table. Hold on for a moment..","Kutengeneza meza. Subiri kwa muda.."
 "Generating the report. Hold on for a moment..","Inazalisha ripoti. Subiri kidogo.."
+"We encountered the following error showing missingness:","Tulikutana na hitilafu ifuatayo inayoonyesha ukosefu:"
+"We encountered the following error browsing your data:","Tulipata hitilafu ifuatayo wakati wa kuvinjari data yako:"
 "Choose a name for the column to be created or modified, then enter an expression before clicking on the button below to create the variable, or cancel to exit without saving anything.","Chagua jina la safu wima itakayoundwa au kurekebishwa, kisha ingiza usemi kabla ya kubofya kitufe kilicho hapa chini ili kuunda kigezo, au ghairi ili kutoka bila kuhifadhi chochote."
 "Other","Nyingine"
 "Hour of the day","Saa ya siku"
@@ -225,6 +249,7 @@
 "Split string to multiple observations (rows) in the same column. Also ads id and instance columns","Gawanya mfuatano katika uchunguzi mwingi (safu) katika safu wima moja. Pia vitambulisho vya matangazo na safu wima za mfano"
 "Split character string","Gawanya mfuatano wa herufi"
 "Split text","Gawanya maandishi"
+"Split a character string by a common delimiter","Gawanya mfuatano wa herufi kwa kitenganishi cha kawaida"
 "Select delimiter","Chagua kidhibiti"
 "Browse data preview","Vinjari hakikisho la data"
 "Original data","Data asili"
@@ -236,6 +261,9 @@
 "Side-by-side barplot","Kipande cha baruni cha kando kwa kando"
 "Create side-by-side barplot to show the distribution of categorical levels","Unda mpangilio wa barufa kando ili kuonyesha usambazaji wa viwango vya kategoria"
 "Select table theme","Chagua mandhari ya jedwali"
+"Level of detail","Kiwango cha maelezo"
+"Minimal","Kidogo"
+"Extensive","Kina"
 "Letters","Barua"
 "Words","Maneno"
 "Shorten to first letters","Fupisha herufi za kwanza"
@@ -284,6 +312,7 @@
 "When you need more advanced tools, you'll be prepared to use R directly.","Unapohitaji zana za hali ya juu zaidi, utakuwa tayari kutumia R moja kwa moja."
 "The app contains a selelct number of features and will guide you through key analyses.","The app contains a selelct number of features and will guide you through key analyses."
 "Sort by Levels","Sort by Levels"
+"Reorder factor levels","Reorder factor levels"
 "Modify factor levels","Modify factor levels"
 "Reorder or rename the levels of factor/categorical variables.","Reorder or rename the levels of factor/categorical variables."
 "Maximum number of observations:","Maximum number of observations:"
@@ -297,34 +326,5 @@
 "No data present.","No data present."
 "You have provided a complete dataset with no missing values.","You have provided a complete dataset with no missing values."
 "Start by loading data.","Start by loading data."
-"Create a new variable; otherwise replaces (Updating labels always creates new variable)","Create a new variable; otherwise replaces (Updating labels always creates new variable)"
-"Data classes and missing observations","Data classes and missing observations"
-"We encountered the following error showing missingness:","We encountered the following error showing missingness:"
-"Please confirm data reset!","Please confirm data reset!"
-"Sure you want to reset data? This cannot be undone.","Sure you want to reset data? This cannot be undone."
-"Confirm","Confirm"
-"The filtered data","The filtered data"
-"Reorder factor levels","Reorder factor levels"
-"Split a character string by a common delimiter","Split a character string by a common delimiter"
-"Create new variables","Create new variables"
-"Select data types to include","Select data types to include"
-"Uploaded data overview","Uploaded data overview"
-"We encountered the following error browsing your data:","We encountered the following error browsing your data:"
-"Data import","Data import"
-"Data import formatting","Data import formatting"
-"Data modifications","Data modifications"
-"Variables filter","Variables filter"
-"Data filter","Data filter"
-"Data characteristics table","Data characteristics table"
-"Level of detail","Level of detail"
-"Minimal","Minimal"
-"Extensive","Extensive"
-"The dataset without text variables","The dataset without text variables"
-"The data includes {n_col} variables. Please limit to 100.","The data includes {n_col} variables. Please limit to 100."
-"Creating the table. Hold on for a moment..","Creating the table. Hold on for a moment.."
-"File upload","File upload"
-"REDCap server export","REDCap server export"
-"Local or sample data","Local or sample data"
 "Sample data","Sample data"
-"Settings","Settings"
-"Create new factor","Create new factor"
+"Create a new variable; otherwise replaces (Updating labels always creates new variable)","Create a new variable; otherwise replaces (Updating labels always creates new variable)"

man/launch_FreesearchR.Rd

@@ -5,7 +5,7 @@
 \title{Easily launch the FreesearchR app}
 \usage{
 launch_FreesearchR(
-  include_globalenv = TRUE,
+  inlcude_globalenv = TRUE,
   data_limit_default = 1000,
   data_limit_upper = 1e+05,
   data_limit_lower = 1,
@@ -13,9 +13,6 @@ launch_FreesearchR(
 )
 }
 \arguments{
-\item{include_globalenv}{flag to include global env (local data) as option
-when loading data}
-
 \item{data_limit_default}{default data set observations limit}
 
 \item{data_limit_upper}{data set observations upper limit}
@@ -23,6 +20,9 @@ when loading data}
 \item{data_limit_lower}{data set observations lower limit}
 
 \item{...}{passed on to \code{shiny::runApp()}}
+
+\item{include_globalenv}{flag to include global env (local data) as option
+when loading data}
 }
 \value{
 shiny app

renv.lock

@@ -2761,7 +2761,7 @@
     },
     "effectsize": {
       "Package": "effectsize",
-      "Version": "1.0.2",
+      "Version": "1.0.1",
       "Source": "Repository",
       "Type": "Package",
       "Title": "Indices of Effect Size",
@@ -2775,11 +2775,11 @@
         "R (>= 4.0)"
       ],
       "Imports": [
-        "bayestestR (>= 0.17.0)",
-        "insight (>= 1.4.5)",
-        "parameters (>= 0.28.3)",
-        "performance (>= 0.15.3)",
-        "datawizard (>= 1.3.0)",
+        "bayestestR (>= 0.16.0)",
+        "insight (>= 1.3.0)",
+        "parameters (>= 0.26.0)",
+        "performance (>= 0.14.0)",
+        "datawizard (>= 1.1.0)",
         "stats",
         "utils"
       ],
@@ -2809,7 +2809,7 @@
       "VignetteBuilder": "knitr",
       "Encoding": "UTF-8",
       "Language": "en-US",
-      "RoxygenNote": "7.3.3",
+      "RoxygenNote": "7.3.2",
       "Config/testthat/edition": "3",
       "Config/testthat/parallel": "true",
       "Config/Needs/website": "rstudio/bslib, r-lib/pkgdown, easystats/easystatstemplate",
@@ -3405,10 +3405,10 @@
     },
     "foreign": {
       "Package": "foreign",
-      "Version": "0.8-91",
+      "Version": "0.8-90",
       "Source": "Repository",
       "Priority": "recommended",
-      "Date": "2026-01-29",
+      "Date": "2025-03-31",
       "Title": "Read Data Stored by 'Minitab', 'S', 'SAS', 'SPSS', 'Stata', 'Systat', 'Weka', 'dBase', ...",
       "Depends": [
         "R (>= 4.0.0)"
@@ -3429,22 +3429,22 @@
       "MailingList": "R-help@r-project.org",
       "URL": "https://svn.r-project.org/R-packages/trunk/foreign/",
       "NeedsCompilation": "yes",
-      "Author": "R Core Team [aut, cph, cre] (ROR: <https://ror.org/02zz1nj61>), Roger Bivand [ctb, cph], Vincent J. Carey [ctb, cph], Saikat DebRoy [ctb, cph], Stephen Eglen [ctb, cph], Rajarshi Guha [ctb, cph], Swetlana Herbrandt [ctb], Nicholas Lewin-Koh [ctb, cph], Mark Myatt [ctb, cph], Michael Nelson [ctb], Ben Pfaff [ctb], Brian Quistorff [ctb], Frank Warmerdam [ctb, cph], Stephen Weigand [ctb, cph], Free Software Foundation, Inc. [cph]",
+      "Author": "R Core Team [aut, cph, cre] (02zz1nj61), Roger Bivand [ctb, cph], Vincent J. Carey [ctb, cph], Saikat DebRoy [ctb, cph], Stephen Eglen [ctb, cph], Rajarshi Guha [ctb, cph], Swetlana Herbrandt [ctb], Nicholas Lewin-Koh [ctb, cph], Mark Myatt [ctb, cph], Michael Nelson [ctb], Ben Pfaff [ctb], Brian Quistorff [ctb], Frank Warmerdam [ctb, cph], Stephen Weigand [ctb, cph], Free Software Foundation, Inc. [cph]",
       "Maintainer": "R Core Team <R-core@R-project.org>",
       "Repository": "CRAN"
     },
     "fs": {
       "Package": "fs",
-      "Version": "1.6.7",
+      "Version": "1.6.6",
       "Source": "Repository",
       "Title": "Cross-Platform File System Operations Based on 'libuv'",
-      "Authors@R": "c( person(\"Jim\", \"Hester\", role = \"aut\"), person(\"Hadley\", \"Wickham\", role = \"aut\"), person(\"Gábor\", \"Csárdi\", role = \"aut\"), person(\"Jeroen\", \"Ooms\", , \"jeroenooms@gmail.com\", role = \"cre\"), person(\"libuv project contributors\", role = \"cph\", comment = \"libuv library\"), person(\"Joyent, Inc. and other Node contributors\", role = \"cph\", comment = \"libuv library\"), person(\"Posit Software, PBC\", role = c(\"cph\", \"fnd\"), comment = c(ROR = \"03wc8by49\")) )",
+      "Authors@R": "c( person(\"Jim\", \"Hester\", role = \"aut\"), person(\"Hadley\", \"Wickham\", , \"hadley@posit.co\", role = \"aut\"), person(\"Gábor\", \"Csárdi\", , \"csardi.gabor@gmail.com\", role = c(\"aut\", \"cre\")), person(\"libuv project contributors\", role = \"cph\", comment = \"libuv library\"), person(\"Joyent, Inc. and other Node contributors\", role = \"cph\", comment = \"libuv library\"), person(\"Posit Software, PBC\", role = c(\"cph\", \"fnd\")) )",
       "Description": "A cross-platform interface to file system operations, built on top of the 'libuv' C library.",
       "License": "MIT + file LICENSE",
       "URL": "https://fs.r-lib.org, https://github.com/r-lib/fs",
       "BugReports": "https://github.com/r-lib/fs/issues",
       "Depends": [
-        "R (>= 4.1)"
+        "R (>= 3.6)"
       ],
       "Imports": [
         "methods"
@@ -3465,15 +3465,14 @@
       "ByteCompile": "true",
       "Config/Needs/website": "tidyverse/tidytemplate",
       "Config/testthat/edition": "3",
-      "Config/usethis/last-upkeep": "2025-04-23",
       "Copyright": "file COPYRIGHTS",
       "Encoding": "UTF-8",
       "Language": "en-US",
-      "RoxygenNote": "7.3.3",
+      "RoxygenNote": "7.2.3",
       "SystemRequirements": "GNU make",
       "NeedsCompilation": "yes",
-      "Author": "Jim Hester [aut], Hadley Wickham [aut], Gábor Csárdi [aut], Jeroen Ooms [cre], libuv project contributors [cph] (libuv library), Joyent, Inc. and other Node contributors [cph] (libuv library), Posit Software, PBC [cph, fnd] (ROR: <https://ror.org/03wc8by49>)",
-      "Maintainer": "Jeroen Ooms <jeroenooms@gmail.com>",
+      "Author": "Jim Hester [aut], Hadley Wickham [aut], Gábor Csárdi [aut, cre], libuv project contributors [cph] (libuv library), Joyent, Inc. and other Node contributors [cph] (libuv library), Posit Software, PBC [cph, fnd]",
+      "Maintainer": "Gábor Csárdi <csardi.gabor@gmail.com>",
       "Repository": "CRAN"
     },
     "gap": {
@@ -3643,7 +3642,7 @@
     },
     "ggalluvial": {
       "Package": "ggalluvial",
-      "Version": "0.12.6",
+      "Version": "0.12.5",
       "Source": "Repository",
       "Type": "Package",
       "Title": "Alluvial Plots in 'ggplot2'",
@@ -3890,7 +3889,7 @@
     },
     "ggstats": {
       "Package": "ggstats",
-      "Version": "0.13.0",
+      "Version": "0.12.0",
       "Source": "Repository",
       "Type": "Package",
       "Title": "Extension to 'ggplot2' for Plotting Stats",
@@ -4289,7 +4288,7 @@
     },
     "highr": {
       "Package": "highr",
-      "Version": "0.12",
+      "Version": "0.11",
       "Source": "Repository",
       "Type": "Package",
       "Title": "Syntax Highlighting for R Source Code",
@@ -4311,9 +4310,9 @@
       "BugReports": "https://github.com/yihui/highr/issues",
       "VignetteBuilder": "knitr",
       "Encoding": "UTF-8",
-      "RoxygenNote": "7.3.3",
+      "RoxygenNote": "7.3.1",
       "NeedsCompilation": "no",
-      "Author": "Yihui Xie [aut, cre] (ORCID: <https://orcid.org/0000-0003-0645-5666>), Yixuan Qiu [aut], Christopher Gandrud [ctb], Qiang Li [ctb]",
+      "Author": "Yihui Xie [aut, cre] (<https://orcid.org/0000-0003-0645-5666>), Yixuan Qiu [aut], Christopher Gandrud [ctb], Qiang Li [ctb]",
       "Maintainer": "Yihui Xie <xie@yihui.name>",
       "Repository": "CRAN"
     },
@@ -5042,7 +5041,7 @@
     },
     "later": {
       "Package": "later",
-      "Version": "1.4.8",
+      "Version": "1.4.6",
       "Source": "Repository",
       "Type": "Package",
       "Title": "Utilities for Scheduling Functions to Execute Later with Event Loops",
@@ -5218,74 +5217,72 @@
     },
     "lme4": {
       "Package": "lme4",
-      "Version": "2.0-1",
+      "Version": "1.1-38",
       "Source": "Repository",
       "Title": "Linear Mixed-Effects Models using 'Eigen' and S4",
-      "Authors@R": "c(person(\"Douglas\", \"Bates\", role = \"aut\", comment = c(ORCID = \"0000-0001-8316-9503\")), person(\"Martin\", \"Maechler\", role = \"aut\", comment = c(ORCID = \"0000-0002-8685-9910\")), person(\"Ben\", \"Bolker\", role = c(\"cre\", \"aut\"), email = \"bbolker+lme4@gmail.com\", comment = c(ORCID = \"0000-0002-2127-0443\")), person(\"Steven\", \"Walker\", role = \"aut\", comment = c(ORCID = \"0000-0002-4394-9078\")), person(\"Rune Haubo Bojesen\", \"Christensen\", role = \"ctb\", comment = c(ORCID = \"0000-0002-4494-3399\")), person(\"Henrik\", \"Singmann\", role = \"ctb\", comment = c(ORCID = \"0000-0002-4842-3657\")), person(\"Bin\", \"Dai\", role = \"ctb\"), person(\"Fabian\", \"Scheipl\", role = \"ctb\", comment = c(ORCID = \"0000-0001-8172-3603\")), person(\"Gabor\", \"Grothendieck\", role = \"ctb\"), person(\"Peter\", \"Green\", role = \"ctb\", comment = c(ORCID = \"0000-0002-0238-9852\")), person(\"John\", \"Fox\", role = \"ctb\"), person(\"Alexander\", \"Bauer\", role = \"ctb\"), person(\"Pavel N.\", \"Krivitsky\", role = c(\"ctb\", \"cph\"), comment = c(ORCID = \"0000-0002-9101-3362\", \"shared copyright on simulate.formula\")), person(\"Emi\", \"Tanaka\", role = \"ctb\", comment = c(ORCID = \"0000-0002-1455-259X\")), person(\"Mikael\", \"Jagan\", role = \"aut\", comment = c(ORCID = \"0000-0002-3542-2938\")), person(\"Ross D.\", \"Boylan\", role = \"ctb\", comment = c(ORCID = \"0009-0003-4123-8090\")), person(\"Anna\", \"Ly\", role = \"aut\", comment = c(ORCID = \"0000-0002-0210-0342\")))",
-      "Description": "Fit linear and generalized linear mixed-effects models.  The models and their components are represented using S4 classes and methods.  The core computational algorithms are implemented using the 'Eigen' C++ library for numerical linear algebra and 'RcppEigen' \"glue\".",
+      "Authors@R": "c( person(\"Douglas\",\"Bates\", role=\"aut\", comment=c(ORCID=\"0000-0001-8316-9503\")), person(\"Martin\",\"Maechler\", role=\"aut\", comment=c(ORCID=\"0000-0002-8685-9910\")), person(\"Ben\",\"Bolker\",email=\"bbolker+lme4@gmail.com\", role=c(\"aut\",\"cre\"), comment=c(ORCID=\"0000-0002-2127-0443\")), person(\"Steven\",\"Walker\",role=\"aut\", comment=c(ORCID=\"0000-0002-4394-9078\")), person(\"Rune Haubo Bojesen\",\"Christensen\", role=\"ctb\", comment=c(ORCID=\"0000-0002-4494-3399\")), person(\"Henrik\",\"Singmann\", role=\"ctb\", comment=c(ORCID=\"0000-0002-4842-3657\")), person(\"Bin\", \"Dai\", role=\"ctb\"), person(\"Fabian\", \"Scheipl\", role=\"ctb\", comment=c(ORCID=\"0000-0001-8172-3603\")), person(\"Gabor\", \"Grothendieck\", role=\"ctb\"), person(\"Peter\", \"Green\", role=\"ctb\", comment=c(ORCID=\"0000-0002-0238-9852\")), person(\"John\", \"Fox\", role=\"ctb\"), person(\"Alexander\", \"Bauer\", role=\"ctb\"), person(\"Pavel N.\", \"Krivitsky\", role=c(\"ctb\",\"cph\"), comment=c(ORCID=\"0000-0002-9101-3362\", \"shared copyright on simulate.formula\")), person(\"Emi\", \"Tanaka\", role = \"ctb\", comment = c(ORCID=\"0000-0002-1455-259X\")), person(\"Mikael\", \"Jagan\", role = \"ctb\", comment = c(ORCID=\"0000-0002-3542-2938\")), person(\"Ross D.\", \"Boylan\", email=\"ross.boylan@ucsf.edu\", role=(\"ctb\"), comment = c(ORCID=\"0009-0003-4123-8090\")), person(\"Anna\", \"Ly\", role = \"ctb\", comment = c(ORCID = \"0000-0002-0210-0342\")) )",
+      "Description": "Fit linear and generalized linear mixed-effects models. The models and their components are represented using S4 classes and methods.  The core computational algorithms are implemented using the 'Eigen' C++ library for numerical linear algebra and 'RcppEigen' \"glue\".",
       "Depends": [
-        "R (>= 3.6)",
+        "R (>= 3.6.0)",
         "Matrix",
         "methods",
         "stats"
       ],
       "LinkingTo": [
-        "Matrix (>= 1.5-0)",
         "Rcpp (>= 0.10.5)",
-        "RcppEigen (>= 0.3.3.9.4)"
+        "RcppEigen (>= 0.3.3.9.4)",
+        "Matrix (>= 1.5-0)"
       ],
       "Imports": [
-        "MASS",
-        "Rdpack",
-        "boot",
         "graphics",
         "grid",
-        "lattice",
-        "minqa (>= 1.1.15)",
-        "nlme (>= 3.1-123)",
-        "nloptr (>= 1.0.4)",
-        "parallel",
-        "reformulas (>= 0.4.3.1)",
-        "rlang",
         "splines",
-        "utils"
+        "utils",
+        "parallel",
+        "MASS",
+        "lattice",
+        "boot",
+        "nlme (>= 3.1-123)",
+        "minqa (>= 1.1.15)",
+        "nloptr (>= 1.0.4)",
+        "reformulas (>= 0.3.0)",
+        "rlang",
+        "Rdpack"
       ],
+      "RdMacros": "Rdpack",
       "Suggests": [
-        "HSAUR3",
+        "knitr",
+        "rmarkdown",
         "MEMSS",
+        "testthat (>= 0.8.1)",
+        "ggplot2",
+        "mlmRev",
+        "optimx (>= 2013.8.6)",
+        "gamm4",
+        "pbkrtest",
+        "HSAUR3",
+        "numDeriv",
         "car",
         "dfoptim",
-        "gamm4",
-        "ggplot2",
-        "glmmTMB",
-        "knitr",
-        "merDeriv",
         "mgcv",
-        "mlmRev",
-        "numDeriv",
-        "optimx (>= 2013.8.6)",
-        "pbkrtest",
-        "rmarkdown",
+        "statmod",
         "rr2",
         "semEff",
-        "statmod",
-        "testthat (>= 0.8.1)",
-        "tibble"
+        "tibble",
+        "merDeriv"
       ],
       "Enhances": [
         "DHARMa",
         "performance"
       ],
-      "RdMacros": "Rdpack",
       "VignetteBuilder": "knitr",
       "LazyData": "yes",
       "License": "GPL (>= 2)",
       "URL": "https://github.com/lme4/lme4/",
       "BugReports": "https://github.com/lme4/lme4/issues",
       "Encoding": "UTF-8",
-      "RoxygenNote": "7.3.3",
       "NeedsCompilation": "yes",
-      "Author": "Douglas Bates [aut] (ORCID: <https://orcid.org/0000-0001-8316-9503>), Martin Maechler [aut] (ORCID: <https://orcid.org/0000-0002-8685-9910>), Ben Bolker [cre, aut] (ORCID: <https://orcid.org/0000-0002-2127-0443>), Steven Walker [aut] (ORCID: <https://orcid.org/0000-0002-4394-9078>), Rune Haubo Bojesen Christensen [ctb] (ORCID: <https://orcid.org/0000-0002-4494-3399>), Henrik Singmann [ctb] (ORCID: <https://orcid.org/0000-0002-4842-3657>), Bin Dai [ctb], Fabian Scheipl [ctb] (ORCID: <https://orcid.org/0000-0001-8172-3603>), Gabor Grothendieck [ctb], Peter Green [ctb] (ORCID: <https://orcid.org/0000-0002-0238-9852>), John Fox [ctb], Alexander Bauer [ctb], Pavel N. Krivitsky [ctb, cph] (ORCID: <https://orcid.org/0000-0002-9101-3362>, shared copyright on simulate.formula), Emi Tanaka [ctb] (ORCID: <https://orcid.org/0000-0002-1455-259X>), Mikael Jagan [aut] (ORCID: <https://orcid.org/0000-0002-3542-2938>), Ross D. Boylan [ctb] (ORCID: <https://orcid.org/0009-0003-4123-8090>), Anna Ly [aut] (ORCID: <https://orcid.org/0000-0002-0210-0342>)",
+      "Author": "Douglas Bates [aut] (ORCID: <https://orcid.org/0000-0001-8316-9503>), Martin Maechler [aut] (ORCID: <https://orcid.org/0000-0002-8685-9910>), Ben Bolker [aut, cre] (ORCID: <https://orcid.org/0000-0002-2127-0443>), Steven Walker [aut] (ORCID: <https://orcid.org/0000-0002-4394-9078>), Rune Haubo Bojesen Christensen [ctb] (ORCID: <https://orcid.org/0000-0002-4494-3399>), Henrik Singmann [ctb] (ORCID: <https://orcid.org/0000-0002-4842-3657>), Bin Dai [ctb], Fabian Scheipl [ctb] (ORCID: <https://orcid.org/0000-0001-8172-3603>), Gabor Grothendieck [ctb], Peter Green [ctb] (ORCID: <https://orcid.org/0000-0002-0238-9852>), John Fox [ctb], Alexander Bauer [ctb], Pavel N. Krivitsky [ctb, cph] (ORCID: <https://orcid.org/0000-0002-9101-3362>, shared copyright on simulate.formula), Emi Tanaka [ctb] (ORCID: <https://orcid.org/0000-0002-1455-259X>), Mikael Jagan [ctb] (ORCID: <https://orcid.org/0000-0002-3542-2938>), Ross D. Boylan [ctb] (ORCID: <https://orcid.org/0009-0003-4123-8090>), Anna Ly [ctb] (ORCID: <https://orcid.org/0000-0002-0210-0342>)",
       "Maintainer": "Ben Bolker <bbolker+lme4@gmail.com>",
       "Repository": "CRAN"
     },
@@ -5462,14 +5459,14 @@
     },
     "mgcv": {
       "Package": "mgcv",
-      "Version": "1.9-4",
+      "Version": "1.9-3",
       "Source": "Repository",
       "Authors@R": "person(given = \"Simon\", family = \"Wood\", role = c(\"aut\", \"cre\"), email = \"simon.wood@r-project.org\")",
       "Title": "Mixed GAM Computation Vehicle with Automatic Smoothness Estimation",
-      "Description": "Generalized additive (mixed) models, some of their extensions and  other generalized ridge regression with multiple smoothing  parameter estimation by (Restricted) Marginal Likelihood,  Cross Validation and similar, or using iterated nested Laplace approximation for fully Bayesian inference. See Wood (2025) <doi:10.1146/annurev-statistics-112723-034249> for an overview. Includes a gam() function, a wide variety of smoothers, 'JAGS' support and distributions beyond the exponential family.",
+      "Description": "Generalized additive (mixed) models, some of their extensions and  other generalized ridge regression with multiple smoothing  parameter estimation by (Restricted) Marginal Likelihood,  Generalized Cross Validation and similar, or using iterated  nested Laplace approximation for fully Bayesian inference. See  Wood (2017) <doi:10.1201/9781315370279> for an overview.  Includes a gam() function, a wide variety of smoothers, 'JAGS'  support and distributions beyond the exponential family.",
       "Priority": "recommended",
       "Depends": [
-        "R (>= 4.4.0)",
+        "R (>= 3.6.0)",
         "nlme (>= 3.1-64)"
       ],
       "Imports": [
@@ -5675,10 +5672,10 @@
     },
     "mvtnorm": {
       "Package": "mvtnorm",
-      "Version": "1.3-2",
+      "Version": "1.3-3",
       "Source": "Repository",
       "Title": "Multivariate Normal and t Distributions",
-      "Date": "2024-11-04",
+      "Date": "2025-01-09",
       "Authors@R": "c(person(\"Alan\", \"Genz\", role = \"aut\"), person(\"Frank\", \"Bretz\", role = \"aut\"), person(\"Tetsuhisa\", \"Miwa\", role = \"aut\"), person(\"Xuefei\", \"Mi\", role = \"aut\"), person(\"Friedrich\", \"Leisch\", role = \"ctb\"), person(\"Fabian\", \"Scheipl\", role = \"ctb\"), person(\"Bjoern\", \"Bornkamp\", role = \"ctb\", comment = c(ORCID = \"0000-0002-6294-8185\")), person(\"Martin\", \"Maechler\", role = \"ctb\", comment = c(ORCID = \"0000-0002-8685-9910\")), person(\"Torsten\", \"Hothorn\", role = c(\"aut\", \"cre\"), email = \"Torsten.Hothorn@R-project.org\", comment = c(ORCID = \"0000-0001-8301-0471\")))",
       "Description": "Computes multivariate normal and t probabilities, quantiles, random deviates,  and densities. Log-likelihoods for multivariate Gaussian models and Gaussian copulae  parameterised by Cholesky factors of covariance or precision matrices are implemented  for interval-censored and exact data, or a mix thereof. Score functions for these  log-likelihoods are available. A class representing multiple lower triangular matrices  and corresponding methods are part of this package.",
       "Imports": [
@@ -5885,7 +5882,7 @@
     },
     "openssl": {
       "Package": "openssl",
-      "Version": "2.3.5",
+      "Version": "2.3.4",
       "Source": "Repository",
       "Type": "Package",
       "Title": "Toolkit for Encryption, Signatures and Certificates Based on OpenSSL",
@@ -5918,7 +5915,7 @@
     },
     "openxlsx2": {
       "Package": "openxlsx2",
-      "Version": "1.25",
+      "Version": "1.23.1",
       "Source": "Repository",
       "Type": "Package",
       "Title": "Read, Write and Edit 'xlsx' Files",
@@ -5945,10 +5942,10 @@
         "ggplot2",
         "knitr",
         "mschart (>= 0.4)",
-        "openssl",
         "rmarkdown",
         "rvg",
         "testthat (>= 3.0.0)",
+        "waldo",
         "zip"
       ],
       "VignetteBuilder": "knitr",
@@ -7092,7 +7089,7 @@
     },
     "ragg": {
       "Package": "ragg",
-      "Version": "1.5.1",
+      "Version": "1.5.0",
       "Source": "Repository",
       "Type": "Package",
       "Title": "Graphic Devices Based on AGG",
@@ -7121,7 +7118,7 @@
       "Config/testthat/edition": "3",
       "Config/usethis/last-upkeep": "2025-04-25",
       "Encoding": "UTF-8",
-      "RoxygenNote": "7.3.3",
+      "RoxygenNote": "7.3.2",
       "SystemRequirements": "freetype2, libpng, libtiff, libjpeg, libwebp, libwebpmux",
       "NeedsCompilation": "yes",
       "Author": "Thomas Lin Pedersen [cre, aut] (ORCID: <https://orcid.org/0000-0002-5147-4711>), Maxim Shemanarev [aut, cph] (Author of AGG), Tony Juricic [ctb, cph] (Contributor to AGG), Milan Marusinec [ctb, cph] (Contributor to AGG), Spencer Garrett [ctb] (Contributor to AGG), Posit Software, PBC [cph, fnd] (ROR: <https://ror.org/03wc8by49>)",
@@ -7544,7 +7541,7 @@
     },
     "renv": {
       "Package": "renv",
-      "Version": "1.1.8",
+      "Version": "1.1.7",
       "Source": "Repository",
       "Type": "Package",
       "Title": "Project Environments",
@@ -7588,11 +7585,11 @@
       "Encoding": "UTF-8",
       "RoxygenNote": "7.3.3",
       "VignetteBuilder": "knitr",
-      "NeedsCompilation": "yes",
       "Config/Needs/website": "tidyverse/tidytemplate",
       "Config/testthat/edition": "3",
       "Config/testthat/parallel": "true",
       "Config/testthat/start-first": "bioconductor,python,install,restore,snapshot,retrieve,remotes",
+      "NeedsCompilation": "no",
       "Author": "Kevin Ushey [aut, cre] (ORCID: <https://orcid.org/0000-0003-2880-7407>), Hadley Wickham [aut] (ORCID: <https://orcid.org/0000-0003-4757-117X>), Posit Software, PBC [cph, fnd]",
       "Maintainer": "Kevin Ushey <kevin@rstudio.com>",
       "Repository": "CRAN"
@@ -8320,7 +8317,7 @@
     },
     "shinyWidgets": {
       "Package": "shinyWidgets",
-      "Version": "0.9.1",
+      "Version": "0.9.0",
       "Source": "Repository",
       "Title": "Custom Inputs Widgets for Shiny",
       "Authors@R": "c( person(\"Victor\", \"Perrier\", email = \"victor.perrier@dreamrs.fr\", role = c(\"aut\", \"cre\", \"cph\")), person(\"Fanny\", \"Meyer\", role = \"aut\"), person(\"David\", \"Granjon\", role = \"aut\"), person(\"Ian\", \"Fellows\", role = \"ctb\", comment = \"Methods for mutating vertical tabs & updateMultiInput\"), person(\"Wil\", \"Davis\", role = \"ctb\", comment = \"numericRangeInput function\"), person(\"Spencer\", \"Matthews\", role = \"ctb\", comment = \"autoNumeric methods\"), person(family = \"JavaScript and CSS libraries authors\", role = c(\"ctb\", \"cph\"), comment = \"All authors are listed in LICENSE.md\") )",
@@ -8330,7 +8327,7 @@
       "License": "GPL-3",
       "Encoding": "UTF-8",
       "LazyData": "true",
-      "RoxygenNote": "7.3.3",
+      "RoxygenNote": "7.3.2",
       "Depends": [
         "R (>= 3.1.0)"
       ],
@@ -8627,7 +8624,7 @@
     },
     "systemfonts": {
       "Package": "systemfonts",
-      "Version": "1.3.2",
+      "Version": "1.3.1",
       "Source": "Repository",
       "Type": "Package",
       "Title": "System Native Font Finding",
@@ -8675,7 +8672,7 @@
     },
     "textshaping": {
       "Package": "textshaping",
-      "Version": "1.0.5",
+      "Version": "1.0.4",
       "Source": "Repository",
       "Title": "Bindings to the 'HarfBuzz' and 'Fribidi' Libraries for Text Shaping",
       "Authors@R": "c( person(\"Thomas Lin\", \"Pedersen\", , \"thomas.pedersen@posit.co\", role = c(\"cre\", \"aut\"), comment = c(ORCID = \"0000-0002-5147-4711\")), person(\"Posit Software, PBC\", role = c(\"cph\", \"fnd\"), comment = c(ROR = \"03wc8by49\")) )",
@@ -9516,23 +9513,21 @@
     },
     "xtable": {
       "Package": "xtable",
-      "Version": "1.8-8",
+      "Version": "1.8-4",
       "Source": "Repository",
-      "Date": "2026-02-20",
+      "Date": "2019-04-08",
       "Title": "Export Tables to LaTeX or HTML",
       "Authors@R": "c(person(\"David B.\", \"Dahl\", role=\"aut\"), person(\"David\", \"Scott\", role=c(\"aut\",\"cre\"), email=\"d.scott@auckland.ac.nz\"), person(\"Charles\", \"Roosen\", role=\"aut\"), person(\"Arni\", \"Magnusson\", role=\"aut\"), person(\"Jonathan\", \"Swinton\", role=\"aut\"), person(\"Ajay\", \"Shah\", role=\"ctb\"), person(\"Arne\", \"Henningsen\", role=\"ctb\"), person(\"Benno\", \"Puetz\", role=\"ctb\"), person(\"Bernhard\", \"Pfaff\", role=\"ctb\"), person(\"Claudio\", \"Agostinelli\", role=\"ctb\"), person(\"Claudius\", \"Loehnert\", role=\"ctb\"), person(\"David\", \"Mitchell\", role=\"ctb\"), person(\"David\", \"Whiting\", role=\"ctb\"), person(\"Fernando da\", \"Rosa\", role=\"ctb\"), person(\"Guido\", \"Gay\", role=\"ctb\"), person(\"Guido\", \"Schulz\", role=\"ctb\"), person(\"Ian\", \"Fellows\", role=\"ctb\"), person(\"Jeff\", \"Laake\", role=\"ctb\"), person(\"John\", \"Walker\", role=\"ctb\"), person(\"Jun\", \"Yan\", role=\"ctb\"), person(\"Liviu\", \"Andronic\", role=\"ctb\"), person(\"Markus\", \"Loecher\", role=\"ctb\"), person(\"Martin\", \"Gubri\", role=\"ctb\"), person(\"Matthieu\", \"Stigler\", role=\"ctb\"), person(\"Robert\", \"Castelo\", role=\"ctb\"), person(\"Seth\", \"Falcon\", role=\"ctb\"), person(\"Stefan\", \"Edwards\", role=\"ctb\"), person(\"Sven\", \"Garbade\", role=\"ctb\"), person(\"Uwe\", \"Ligges\", role=\"ctb\"))",
       "Maintainer": "David Scott <d.scott@auckland.ac.nz>",
       "Imports": [
         "stats",
-        "utils",
-        "methods"
+        "utils"
       ],
       "Suggests": [
         "knitr",
+        "plm",
         "zoo",
-        "survival",
-        "glue",
-        "tinytex"
+        "survival"
       ],
       "VignetteBuilder": "knitr",
       "Description": "Coerce data to LaTeX and HTML tables.",

renv/activate.R

@@ -2,8 +2,8 @@
 local({
 
   # the requested version of renv
-  version <- "1.1.8"
-  attr(version, "md5") <- "cbffd086c66739a0fdaac7a30b4aa65c"
+  version <- "1.1.7"
+  attr(version, "md5") <- "dd5d60f155dadff4c88c2fc6680504b4"
   attr(version, "sha") <- NULL
 
   # the project directory

tests/testthat/test-default-parsing.R

@@ -1,134 +0,0 @@
-test_that("default_parsing returns a data.frame", {
-  result <- default_parsing(mtcars)
-  expect_true(is.data.frame(result))
-})
-
-test_that("default_parsing preserves row count", {
-  result <- default_parsing(mtcars)
-  expect_equal(nrow(result), nrow(mtcars))
-})
-
-test_that("default_parsing preserves column count", {
-  result <- default_parsing(mtcars)
-  expect_equal(ncol(result), ncol(mtcars))
-})
-
-test_that("default_parsing produces valid column names (make.names compatible)", {
-  # Create data with problematic column names
-  bad_names_df <- data.frame(
-    `1bad` = 1:5,
-    `has space` = letters[1:5],
-    `good_name` = TRUE,
-    check.names = FALSE
-  )
-  result <- default_parsing(bad_names_df)
-  expect_true(all(make.names(names(result)) == names(result)))
-})
-
-test_that("default_parsing handles duplicate column names", {
-  dup_df <- data.frame(a = 1:5, b = 6:10)
-  names(dup_df) <- c("x", "x")
-  result <- default_parsing(dup_df)
-  expect_equal(length(names(result)), 2)
-  expect_true(all(!duplicated(names(result))))
-})
-
-test_that("default_parsing converts low-cardinality numeric columns to factor", {
-  # A numeric column with <= 8 unique values should become a factor
-  df <- data.frame(
-    group = c(1, 2, 3, 1, 2, 3, 1, 2),   # 3 unique → factor
-    value = rnorm(8)                        # 8 unique → stays numeric
-  )
-  result <- default_parsing(df)
-  expect_true(is.factor(result$group))
-})
-
-test_that("default_parsing converts low-cardinality character columns to factor", {
-  # A character column with <= 10 unique values should become a factor
-  df <- data.frame(
-    category = rep(c("a", "b", "c"), 4),   # 3 unique → factor
-    stringsAsFactors = FALSE
-  )
-  result <- default_parsing(df)
-  expect_true(is.factor(result$category))
-})
-
-test_that("default_parsing drops unused factor levels", {
-  df <- data.frame(
-    x = factor(c("a", "b", "a"), levels = c("a", "b", "c"))  # "c" unused
-  )
-  result <- default_parsing(df)
-  expect_false("c" %in% levels(result$x))
-})
-
-test_that("default_parsing converts logical-like columns to logical", {
-  df <- data.frame(
-    flag = c(0L, 1L, 0L, 1L, 0L),
-    stringsAsFactors = FALSE
-  )
-  result <- default_parsing(df)
-  # as_logical should have converted 0/1 integer to logical
-  expect_true(is.logical(result$flag))
-})
-
-test_that("default_parsing preserves column labels when present", {
-  df <- data.frame(a = 1:3, b = c("x", "y", "z"), stringsAsFactors = FALSE)
-  attr(df$a, "label") <- "Column A Label"
-  attr(df$b, "label") <- "Column B Label"
-
-  result <- default_parsing(df)
-
-  expect_equal(attr(result$a, "label"), "Column A Label")
-  expect_equal(attr(result$b, "label"), "Column B Label")
-})
-
-test_that("default_parsing handles columns with no label attribute", {
-  df <- data.frame(a = 1:3, b = c("x", "y", "z"), stringsAsFactors = FALSE)
-  result <- default_parsing(df)
-  # Should not error; label attrs simply absent or NULL
-  expect_null(attr(result$a, "label"))
-})
-
-test_that("default_parsing handles a single-column data.frame", {
-  df <- data.frame(x = 1:10)
-  result <- default_parsing(df)
-  expect_equal(ncol(result), 1)
-  expect_equal(nrow(result), 10)
-})
-
-test_that("default_parsing handles an empty data.frame gracefully", {
-  df <- data.frame(a = integer(0), b = character(0), stringsAsFactors = FALSE)
-  result <- default_parsing(df)
-  expect_equal(nrow(result), 0)
-})
-
-test_that("default_parsing handles all-NA columns without error", {
-  df <- data.frame(a = NA_real_, b = NA_character_, stringsAsFactors = FALSE)
-  expect_no_error(default_parsing(df))
-})
-
-test_that("default_parsing removes nested list columns", {
-  df <- data.frame(id = 1:3)
-  df$nested <- list(list(1, 2), list(3), list(4, 5))  # nested list column
-  # Should not crash; nested list column is removed by remove_nested_list()
-  expect_no_error(default_parsing(df))
-})
-
-test_that("default_parsing works with dplyr::starwars-like tibble", {
-  skip_if_not_installed("dplyr")
-  sw <- head(dplyr::starwars, 10)
-  result <- default_parsing(sw)
-  expect_true(is.data.frame(result))
-  expect_equal(nrow(result), 10)
-})
-
-test_that("default_parsing high-cardinality character column stays character or factor", {
-  # > 10 unique values → should NOT be coerced to factor by numchar2fct
-  df <- data.frame(
-    id = paste0("id_", 1:20),
-    stringsAsFactors = FALSE
-  )
-  result <- default_parsing(df)
-  # high cardinality: remains character (not factor)
-  expect_false(is.factor(result$id))
-})