diff --git a/CITATION.cff b/CITATION.cff
index 2a3ec2e4..dd55e2e5 100644
--- a/CITATION.cff
+++ b/CITATION.cff
@@ -9,7 +9,7 @@ type: software
 license: AGPL-3.0-or-later
 title: 'FreesearchR: A free and open-source browser based data analysis tool for researchers
   with publication ready output'
-version: 25.6.4
+version: 25.6.3
 doi: 10.5281/zenodo.14527429
 identifiers:
 - type: url
diff --git a/DESCRIPTION b/DESCRIPTION
index d602b0a3..439b7312 100644
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -1,6 +1,6 @@
 Package: FreesearchR
 Title: A free and open-source browser based data analysis tool for researchers with publication ready output
-Version: 25.6.4
+Version: 25.6.3
 Authors@R: c(
     person("Andreas Gammelgaard", "Damsbo",email="agdamsbo@clin.au.dk", role = c("aut", "cre"),
            comment = c(ORCID = "0000-0002-7559-1154")),
diff --git a/NEWS.md b/NEWS.md
index fd591139..a92e676b 100644
--- a/NEWS.md
+++ b/NEWS.md
@@ -1,9 +1,3 @@
-# FreesearchR 25.6.4
-
-The app is now also published as a docker container. See the README for instructions. It is mainly to use for hosting the app. Work is ongoing to publish a true standalone app, preferably for both Windows and MacOS.
-
-- *FIX* improved plot labels.
-
 # FreesearchR 25.6.3
 
 - *NEW* Introducing more options to evaluate missing observations. Inspired by the [visdat()] function from the {visdat} package, a specialised function has been introduced to easily visualise data classes and missing observations in the data set. This highly increases the options to visually get an overview of the data and to assess the pattern of missing data. Also under Evaluate, a comparison module has been introduced to compare the distribution of observations across variables depending on the missing vs non-missing in a specified variable.
diff --git a/R/app_version.R b/R/app_version.R
index 151c1165..440e842f 100644
--- a/R/app_version.R
+++ b/R/app_version.R
@@ -1 +1 @@
-app_version <- function()'25.6.4'
+app_version <- function()'25.6.3'
diff --git a/R/data_plots.R b/R/data_plots.R
index bed502fc..ba56697e 100644
--- a/R/data_plots.R
+++ b/R/data_plots.R
@@ -337,14 +337,7 @@ data_visuals_server <- function(id,
                 )
 
                 shiny::withProgress(message = "Drawing the plot. Hold tight for a moment..", {
-                  rv$plot <- rlang::exec(
-                    create_plot,
-                    !!!append_list(
-                      data(),
-                      parameters,
-                      "data"
-                    )
-                  )
+                  rv$plot <- rlang::exec(create_plot, !!!append_list(data(), parameters, "data"))
                 })
 
                 rv$code <- glue::glue("FreesearchR::create_plot(df,{list2str(parameters)})")
@@ -400,12 +393,13 @@ data_visuals_server <- function(id,
           paste0("plot.", input$plot_type)
         }),
         content = function(file) {
-          if (inherits(rv$plot, "patchwork")) {
+          if (inherits(rv$plot,"patchwork")){
             plot <- rv$plot
-          } else if (inherits(rv$plot, "ggplot")) {
+          } else if (inherits(rv$plot,"ggplot")){
             plot <- rv$plot
-          } else {
+          }else {
             plot <- rv$plot[[1]]
+
           }
           # browser()
           shiny::withProgress(message = "Drawing the plot. Hold on for a moment..", {
@@ -665,12 +659,12 @@ create_plot <- function(data, type, pri, sec, ter = NULL, ...) {
 
   out <- do.call(
     type,
-    modifyList(parameters, list(data = data))
+    modifyList(parameters,list(data=data))
   )
 
-  code <- rlang::call2(type, !!!parameters, .ns = "FreesearchR")
+  code <- rlang::call2(type,!!!parameters,.ns = "FreesearchR")
 
-  attr(out, "code") <- code
+  attr(out,"code") <- code
   out
 }
 
@@ -737,17 +731,11 @@ line_break <- function(data, lineLength = 20, force = FALSE) {
 #'
 #' @param data list of ggplot2 objects
 #' @param tag_levels passed to patchwork::plot_annotation if given. Default is NULL
-#' @param title panel title
-#' @param ... ignored for argument overflow
 #'
 #' @returns list of ggplot2 objects
 #' @export
 #'
-wrap_plot_list <- function(data,
-                           tag_levels = NULL,
-                           title = NULL,
-                           axis.font.family=NULL,
-                           ...) {
+wrap_plot_list <- function(data, tag_levels = NULL) {
   if (ggplot2::is_ggplot(data[[1]])) {
     if (length(data) > 1) {
       out <- data |>
@@ -761,35 +749,17 @@ wrap_plot_list <- function(data,
           }
         })() |>
         align_axes() |>
-        patchwork::wrap_plots(
-          guides = "collect",
-          axes = "collect",
-          axis_titles = "collect"
-        )
+        patchwork::wrap_plots(guides = "collect", axes = "collect", axis_titles = "collect")
       if (!is.null(tag_levels)) {
         out <- out + patchwork::plot_annotation(tag_levels = tag_levels)
       }
-      if (!is.null(title)) {
-        out <- out +
-          patchwork::plot_annotation(
-            title = title,
-            theme = ggplot2::theme(plot.title = ggplot2::element_text(size = 25))
-          )
-      }
     } else {
-      out <- data[[1]]
+      out <- data
     }
   } else {
     cli::cli_abort("Can only wrap lists of {.cls ggplot} objects")
   }
-
-  if (inherits(x = out, what = "patchwork")) {
-    out &
-      ggplot2::theme(axis.text = ggplot2::element_text(family = axis.font.family))
-  } else {
-    out +
-      ggplot2::theme(axis.text = ggplot2::element_text(family = axis.font.family))
-  }
+  out
 }
 
 
diff --git a/R/hosted_version.R b/R/hosted_version.R
index 17d0c52a..8e4a70d9 100644
--- a/R/hosted_version.R
+++ b/R/hosted_version.R
@@ -1 +1 @@
-hosted_version <- function()'v25.6.4-250627'
+hosted_version <- function()'v25.6.3-250626'
diff --git a/R/plot_box.R b/R/plot_box.R
index b9a5be1b..b516bc33 100644
--- a/R/plot_box.R
+++ b/R/plot_box.R
@@ -1,26 +1,16 @@
 #' Beautiful box plot(s)
 #'
-#' @param data data frame
-#' @param pri primary variable
-#' @param sec secondary variable
-#' @param ter tertiary variable
-#' @param ... passed on to wrap_plot_list
-#'
 #' @returns ggplot2 object
 #' @export
 #'
 #' @name data-plots
 #'
 #' @examples
-#' mtcars |> plot_box(pri = "mpg", sec = "gear")
-#' mtcars |> plot_box(pri = "mpg", sec="cyl")
+#' mtcars |> plot_box(pri = "mpg", sec = "cyl", ter = "gear")
 #' mtcars |>
 #'   default_parsing() |>
 #'   plot_box(pri = "mpg", sec = "cyl", ter = "gear")
-#' mtcars |>
-#'   default_parsing() |>
-#'   plot_box(pri = "mpg", sec = "cyl", ter = "gear",axis.font.family="mono")
-plot_box <- function(data, pri, sec, ter = NULL,...) {
+plot_box <- function(data, pri, sec, ter = NULL) {
   if (!is.null(ter)) {
     ds <- split(data, data[ter])
   } else {
@@ -35,7 +25,7 @@ plot_box <- function(data, pri, sec, ter = NULL,...) {
     )
   })
 
-  wrap_plot_list(out,title=glue::glue("Grouped by {get_label(data,ter)}"),...)
+  wrap_plot_list(out)
 }
 
 
@@ -51,7 +41,6 @@ plot_box <- function(data, pri, sec, ter = NULL,...) {
 #' @examples
 #' mtcars |> plot_box_single("mpg")
 #' mtcars |> plot_box_single("mpg","cyl")
-#' gtsummary::trial |> plot_box_single("age","trt")
 plot_box_single <- function(data, pri, sec=NULL, seed = 2103) {
   set.seed(seed)
 
@@ -67,8 +56,6 @@ plot_box_single <- function(data, pri, sec=NULL, seed = 2103) {
     ggplot2::geom_boxplot(linewidth = 1.8, outliers = FALSE) +
     ## THis could be optional in future
     ggplot2::geom_jitter(color = "black", size = 2, alpha = 0.9, width = 0.1, height = .2) +
-    ggplot2::xlab(get_label(data,pri))+
-    ggplot2::ylab(get_label(data,sec)) +
     ggplot2::coord_flip() +
     viridis::scale_fill_viridis(discrete = discrete, option = "D") +
     # ggplot2::theme_void() +
diff --git a/R/plot_euler.R b/R/plot_euler.R
index fc840495..10156b74 100644
--- a/R/plot_euler.R
+++ b/R/plot_euler.R
@@ -92,7 +92,7 @@ plot_euler <- function(data, pri, sec, ter = NULL, seed = 2103) {
   })
 
   # names(out)
-  wrap_plot_list(out,title=glue::glue("Grouped by {get_label(data,ter)}"))
+  wrap_plot_list(out)
   # patchwork::wrap_plots(out, guides = "collect")
 }
 
diff --git a/R/plot_violin.R b/R/plot_violin.R
index 02fbcf11..e6c54346 100644
--- a/R/plot_violin.R
+++ b/R/plot_violin.R
@@ -24,6 +24,6 @@ plot_violin <- function(data, pri, sec, ter = NULL) {
     )
   })
 
-  wrap_plot_list(out,title=glue::glue("Grouped by {get_label(data,ter)}"))
+  wrap_plot_list(out)
   # patchwork::wrap_plots(out,guides = "collect")
 }
diff --git a/R/sysdata.rda b/R/sysdata.rda
index ff32e166..83be4d5d 100644
Binary files a/R/sysdata.rda and b/R/sysdata.rda differ
diff --git a/SESSION.md b/SESSION.md
index efcc1d93..700f8d27 100644
--- a/SESSION.md
+++ b/SESSION.md
@@ -11,11 +11,11 @@
 |collate     |en_US.UTF-8                                |
 |ctype       |en_US.UTF-8                                |
 |tz          |Europe/Copenhagen                          |
-|date        |2025-06-27                                 |
+|date        |2025-06-26                                 |
 |rstudio     |2025.05.0+496 Mariposa Orchid (desktop)    |
 |pandoc      |3.6.4 @ /opt/homebrew/bin/ (via rmarkdown) |
 |quarto      |1.7.30 @ /usr/local/bin/quarto             |
-|FreesearchR |25.6.4.250627                              |
+|FreesearchR |25.6.3.250626                              |
                                                                                 
                                                                                 
 --------------------------------------------------------------------------------
@@ -26,6 +26,8 @@
 |apexcharter       |0.4.4         |2024-09-06 |CRAN (R 4.4.1) |
 |askpass           |1.2.1         |2024-10-04 |CRAN (R 4.4.1) |
 |assertthat        |0.2.1         |2019-03-21 |CRAN (R 4.4.1) |
+|attachment        |0.4.5         |2025-03-14 |CRAN (R 4.4.1) |
+|attempt           |0.3.1         |2020-05-03 |CRAN (R 4.4.1) |
 |backports         |1.5.0         |2024-05-23 |CRAN (R 4.4.1) |
 |base64enc         |0.1-3         |2015-07-28 |CRAN (R 4.4.1) |
 |bayestestR        |0.15.3        |2025-04-28 |CRAN (R 4.4.1) |
@@ -43,6 +45,7 @@
 |cardx             |0.2.4         |2025-04-12 |CRAN (R 4.4.1) |
 |caTools           |1.18.3        |2024-09-04 |CRAN (R 4.4.1) |
 |cellranger        |1.1.0         |2016-07-27 |CRAN (R 4.4.0) |
+|cffr              |1.2.0         |2025-01-25 |CRAN (R 4.4.1) |
 |checkmate         |2.3.2         |2024-07-29 |CRAN (R 4.4.0) |
 |class             |7.3-23        |2025-01-01 |CRAN (R 4.4.1) |
 |classInt          |0.4-11        |2025-01-08 |CRAN (R 4.4.1) |
@@ -52,6 +55,7 @@
 |colorspace        |2.1-1         |2024-07-26 |CRAN (R 4.4.1) |
 |commonmark        |1.9.5         |2025-03-17 |CRAN (R 4.4.1) |
 |crayon            |1.5.3         |2024-06-20 |CRAN (R 4.4.1) |
+|curl              |6.2.2         |2025-03-24 |CRAN (R 4.4.1) |
 |data.table        |1.17.0        |2025-02-22 |CRAN (R 4.4.1) |
 |datamods          |1.5.3         |2024-10-02 |CRAN (R 4.4.1) |
 |datawizard        |1.0.2         |2025-03-24 |CRAN (R 4.4.1) |
@@ -60,6 +64,7 @@
 |devtools          |2.4.5         |2022-10-11 |CRAN (R 4.4.0) |
 |DHARMa            |0.4.7         |2024-10-18 |CRAN (R 4.4.1) |
 |digest            |0.6.37        |2024-08-19 |CRAN (R 4.4.1) |
+|dockerfiler       |0.2.5         |2025-05-07 |CRAN (R 4.4.1) |
 |doParallel        |1.0.17        |2022-02-07 |CRAN (R 4.4.0) |
 |dplyr             |1.1.4         |2023-11-17 |CRAN (R 4.4.0) |
 |DT                |0.33          |2024-04-04 |CRAN (R 4.4.0) |
@@ -82,7 +87,7 @@
 |foreach           |1.5.2         |2022-02-02 |CRAN (R 4.4.0) |
 |foreign           |0.8-90        |2025-03-31 |CRAN (R 4.4.1) |
 |Formula           |1.2-5         |2023-02-24 |CRAN (R 4.4.1) |
-|FreesearchR       |25.6.4        |NA         |NA             |
+|FreesearchR       |25.6.3        |NA         |NA             |
 |fs                |1.6.6         |2025-04-12 |CRAN (R 4.4.1) |
 |gdtools           |0.4.2         |2025-03-27 |CRAN (R 4.4.1) |
 |generics          |0.1.3         |2022-07-05 |CRAN (R 4.4.1) |
@@ -110,6 +115,7 @@
 |iterators         |1.0.14        |2022-02-05 |CRAN (R 4.4.1) |
 |jquerylib         |0.1.4         |2021-04-26 |CRAN (R 4.4.0) |
 |jsonlite          |2.0.0         |2025-03-27 |CRAN (R 4.4.1) |
+|jsonvalidate      |1.5.0         |2025-02-07 |CRAN (R 4.4.1) |
 |KernSmooth        |2.23-26       |2025-01-01 |CRAN (R 4.4.1) |
 |keyring           |1.3.2         |2023-12-11 |CRAN (R 4.4.0) |
 |knitr             |1.50          |2025-03-16 |CRAN (R 4.4.1) |
@@ -117,9 +123,11 @@
 |later             |1.4.2         |2025-04-08 |CRAN (R 4.4.1) |
 |lattice           |0.22-7        |2025-04-02 |CRAN (R 4.4.1) |
 |lifecycle         |1.0.4         |2023-11-07 |CRAN (R 4.4.1) |
+|litedown          |0.7           |2025-04-08 |CRAN (R 4.4.1) |
 |lme4              |1.1-37        |2025-03-26 |CRAN (R 4.4.1) |
 |lubridate         |1.9.4         |2024-12-08 |CRAN (R 4.4.1) |
 |magrittr          |2.0.3         |2022-03-30 |CRAN (R 4.4.1) |
+|markdown          |2.0           |2025-03-23 |CRAN (R 4.4.1) |
 |MASS              |7.3-65        |2025-02-28 |CRAN (R 4.4.1) |
 |Matrix            |1.7-3         |2025-03-11 |CRAN (R 4.4.1) |
 |memoise           |2.0.1         |2021-11-26 |CRAN (R 4.4.0) |
@@ -134,6 +142,7 @@
 |opdisDownsampling |1.0.1         |2024-04-15 |CRAN (R 4.4.0) |
 |openssl           |2.3.2         |2025-02-03 |CRAN (R 4.4.1) |
 |openxlsx2         |1.15          |2025-04-25 |CRAN (R 4.4.1) |
+|pak               |0.8.0.2       |2025-04-08 |CRAN (R 4.4.1) |
 |parameters        |0.24.2        |2025-03-04 |CRAN (R 4.4.1) |
 |patchwork         |1.3.0         |2024-09-16 |CRAN (R 4.4.1) |
 |pbmcapply         |1.5.1         |2022-04-28 |CRAN (R 4.4.1) |
@@ -162,6 +171,7 @@
 |R6                |2.6.1         |2025-02-15 |CRAN (R 4.4.1) |
 |ragg              |1.4.0         |2025-04-10 |CRAN (R 4.4.1) |
 |rankinPlot        |1.1.0         |2023-01-30 |CRAN (R 4.4.0) |
+|rappdirs          |0.3.3         |2021-01-31 |CRAN (R 4.4.1) |
 |rbibutils         |2.3           |2024-10-04 |CRAN (R 4.4.1) |
 |RColorBrewer      |1.1-3         |2022-04-03 |CRAN (R 4.4.1) |
 |Rcpp              |1.0.14        |2025-01-12 |CRAN (R 4.4.1) |
@@ -192,6 +202,7 @@
 |see               |0.11.0        |2025-03-11 |CRAN (R 4.4.1) |
 |sessioninfo       |1.2.3         |2025-02-05 |CRAN (R 4.4.1) |
 |shiny             |1.10.0        |2024-12-14 |CRAN (R 4.4.1) |
+|shiny2docker      |0.0.2         |2025-02-09 |CRAN (R 4.4.1) |
 |shinybusy         |0.3.3         |2024-03-09 |CRAN (R 4.4.0) |
 |shinyjs           |2.1.0         |2021-12-23 |CRAN (R 4.4.0) |
 |shinyTime         |1.0.3         |2022-08-19 |CRAN (R 4.4.0) |
@@ -213,11 +224,11 @@
 |tzdb              |0.5.0         |2025-03-15 |CRAN (R 4.4.1) |
 |urlchecker        |1.0.1         |2021-11-30 |CRAN (R 4.4.1) |
 |usethis           |3.1.0         |2024-11-26 |CRAN (R 4.4.1) |
-|utf8              |1.2.4         |2023-10-22 |CRAN (R 4.4.1) |
 |uuid              |1.2-1         |2024-07-29 |CRAN (R 4.4.1) |
+|V8                |6.0.3         |2025-03-26 |CRAN (R 4.4.1) |
 |vctrs             |0.6.5         |2023-12-01 |CRAN (R 4.4.0) |
-|viridis           |0.6.5         |2024-01-29 |CRAN (R 4.4.0) |
 |viridisLite       |0.4.2         |2023-05-02 |CRAN (R 4.4.1) |
+|visdat            |0.6.0         |NA         |NA             |
 |vroom             |1.6.5         |2023-12-05 |CRAN (R 4.4.0) |
 |withr             |3.0.2         |2024-10-28 |CRAN (R 4.4.1) |
 |writexl           |1.5.4         |2025-04-15 |CRAN (R 4.4.1) |
@@ -225,4 +236,5 @@
 |xml2              |1.3.8         |2025-03-14 |CRAN (R 4.4.1) |
 |xtable            |1.8-4         |2019-04-21 |CRAN (R 4.4.1) |
 |yaml              |2.3.10        |2024-07-26 |CRAN (R 4.4.1) |
+|yesno             |0.1.3         |2024-07-26 |CRAN (R 4.4.1) |
 |zip               |2.3.2         |2025-02-01 |CRAN (R 4.4.1) |
diff --git a/inst/apps/FreesearchR/app.R b/inst/apps/FreesearchR/app.R
index 28f5e3b6..340380f5 100644
--- a/inst/apps/FreesearchR/app.R
+++ b/inst/apps/FreesearchR/app.R
@@ -49,7 +49,7 @@ library(rlang)
 #### Current file: /Users/au301842/FreesearchR/R//app_version.R 
 ########
 
-app_version <- function()'25.6.4'
+app_version <- function()'25.6.3'
 
 
 ########
@@ -1937,14 +1937,7 @@ data_visuals_server <- function(id,
                 )
 
                 shiny::withProgress(message = "Drawing the plot. Hold tight for a moment..", {
-                  rv$plot <- rlang::exec(
-                    create_plot,
-                    !!!append_list(
-                      data(),
-                      parameters,
-                      "data"
-                    )
-                  )
+                  rv$plot <- rlang::exec(create_plot, !!!append_list(data(), parameters, "data"))
                 })
 
                 rv$code <- glue::glue("FreesearchR::create_plot(df,{list2str(parameters)})")
@@ -2000,12 +1993,13 @@ data_visuals_server <- function(id,
           paste0("plot.", input$plot_type)
         }),
         content = function(file) {
-          if (inherits(rv$plot, "patchwork")) {
+          if (inherits(rv$plot,"patchwork")){
             plot <- rv$plot
-          } else if (inherits(rv$plot, "ggplot")) {
+          } else if (inherits(rv$plot,"ggplot")){
             plot <- rv$plot
-          } else {
+          }else {
             plot <- rv$plot[[1]]
+
           }
           # browser()
           shiny::withProgress(message = "Drawing the plot. Hold on for a moment..", {
@@ -2265,12 +2259,12 @@ create_plot <- function(data, type, pri, sec, ter = NULL, ...) {
 
   out <- do.call(
     type,
-    modifyList(parameters, list(data = data))
+    modifyList(parameters,list(data=data))
   )
 
-  code <- rlang::call2(type, !!!parameters, .ns = "FreesearchR")
+  code <- rlang::call2(type,!!!parameters,.ns = "FreesearchR")
 
-  attr(out, "code") <- code
+  attr(out,"code") <- code
   out
 }
 
@@ -2337,17 +2331,11 @@ line_break <- function(data, lineLength = 20, force = FALSE) {
 #'
 #' @param data list of ggplot2 objects
 #' @param tag_levels passed to patchwork::plot_annotation if given. Default is NULL
-#' @param title panel title
-#' @param ... ignored for argument overflow
 #'
 #' @returns list of ggplot2 objects
 #' @export
 #'
-wrap_plot_list <- function(data,
-                           tag_levels = NULL,
-                           title = NULL,
-                           axis.font.family=NULL,
-                           ...) {
+wrap_plot_list <- function(data, tag_levels = NULL) {
   if (ggplot2::is_ggplot(data[[1]])) {
     if (length(data) > 1) {
       out <- data |>
@@ -2361,35 +2349,17 @@ wrap_plot_list <- function(data,
           }
         })() |>
         align_axes() |>
-        patchwork::wrap_plots(
-          guides = "collect",
-          axes = "collect",
-          axis_titles = "collect"
-        )
+        patchwork::wrap_plots(guides = "collect", axes = "collect", axis_titles = "collect")
       if (!is.null(tag_levels)) {
         out <- out + patchwork::plot_annotation(tag_levels = tag_levels)
       }
-      if (!is.null(title)) {
-        out <- out +
-          patchwork::plot_annotation(
-            title = title,
-            theme = ggplot2::theme(plot.title = ggplot2::element_text(size = 25))
-          )
-      }
     } else {
-      out <- data[[1]]
+      out <- data
     }
   } else {
     cli::cli_abort("Can only wrap lists of {.cls ggplot} objects")
   }
-
-  if (inherits(x = out, what = "patchwork")) {
-    out &
-      ggplot2::theme(axis.text = ggplot2::element_text(family = axis.font.family))
-  } else {
-    out +
-      ggplot2::theme(axis.text = ggplot2::element_text(family = axis.font.family))
-  }
+  out
 }
 
 
@@ -4026,7 +3996,7 @@ simple_snake <- function(data){
 #### Current file: /Users/au301842/FreesearchR/R//hosted_version.R 
 ########
 
-hosted_version <- function()'v25.6.4-250627'
+hosted_version <- function()'v25.6.3-250626'
 
 
 ########
@@ -4835,27 +4805,17 @@ missing_demo_app()
 
 #' Beautiful box plot(s)
 #'
-#' @param data data frame
-#' @param pri primary variable
-#' @param sec secondary variable
-#' @param ter tertiary variable
-#' @param ... passed on to wrap_plot_list
-#'
 #' @returns ggplot2 object
 #' @export
 #'
 #' @name data-plots
 #'
 #' @examples
-#' mtcars |> plot_box(pri = "mpg", sec = "gear")
-#' mtcars |> plot_box(pri = "mpg", sec="cyl")
+#' mtcars |> plot_box(pri = "mpg", sec = "cyl", ter = "gear")
 #' mtcars |>
 #'   default_parsing() |>
 #'   plot_box(pri = "mpg", sec = "cyl", ter = "gear")
-#' mtcars |>
-#'   default_parsing() |>
-#'   plot_box(pri = "mpg", sec = "cyl", ter = "gear",axis.font.family="mono")
-plot_box <- function(data, pri, sec, ter = NULL,...) {
+plot_box <- function(data, pri, sec, ter = NULL) {
   if (!is.null(ter)) {
     ds <- split(data, data[ter])
   } else {
@@ -4870,7 +4830,7 @@ plot_box <- function(data, pri, sec, ter = NULL,...) {
     )
   })
 
-  wrap_plot_list(out,title=glue::glue("Grouped by {get_label(data,ter)}"),...)
+  wrap_plot_list(out)
 }
 
 
@@ -4886,7 +4846,6 @@ plot_box <- function(data, pri, sec, ter = NULL,...) {
 #' @examples
 #' mtcars |> plot_box_single("mpg")
 #' mtcars |> plot_box_single("mpg","cyl")
-#' gtsummary::trial |> plot_box_single("age","trt")
 plot_box_single <- function(data, pri, sec=NULL, seed = 2103) {
   set.seed(seed)
 
@@ -4902,8 +4861,6 @@ plot_box_single <- function(data, pri, sec=NULL, seed = 2103) {
     ggplot2::geom_boxplot(linewidth = 1.8, outliers = FALSE) +
     ## THis could be optional in future
     ggplot2::geom_jitter(color = "black", size = 2, alpha = 0.9, width = 0.1, height = .2) +
-    ggplot2::xlab(get_label(data,pri))+
-    ggplot2::ylab(get_label(data,sec)) +
     ggplot2::coord_flip() +
     viridis::scale_fill_viridis(discrete = discrete, option = "D") +
     # ggplot2::theme_void() +
@@ -5026,7 +4983,7 @@ plot_euler <- function(data, pri, sec, ter = NULL, seed = 2103) {
   })
 
   # names(out)
-  wrap_plot_list(out,title=glue::glue("Grouped by {get_label(data,ter)}"))
+  wrap_plot_list(out)
   # patchwork::wrap_plots(out, guides = "collect")
 }
 
@@ -5501,7 +5458,7 @@ plot_violin <- function(data, pri, sec, ter = NULL) {
     )
   })
 
-  wrap_plot_list(out,title=glue::glue("Grouped by {get_label(data,ter)}"))
+  wrap_plot_list(out)
   # patchwork::wrap_plots(out,guides = "collect")
 }
 
diff --git a/man/data-plots.Rd b/man/data-plots.Rd
index 9a612c1d..6a42b997 100644
--- a/man/data-plots.Rd
+++ b/man/data-plots.Rd
@@ -22,7 +22,7 @@ data_visuals_server(id, data, ...)
 
 create_plot(data, type, pri, sec, ter = NULL, ...)
 
-plot_box(data, pri, sec, ter = NULL, ...)
+plot_box(data, pri, sec, ter = NULL)
 
 plot_box_single(data, pri, sec = NULL, seed = 2103)
 
@@ -41,9 +41,9 @@ plot_violin(data, pri, sec, ter = NULL)
 \arguments{
 \item{id}{Module id. (Use 'ns("id")')}
 
-\item{...}{passed on to wrap_plot_list}
+\item{...}{ignored for now}
 
-\item{data}{data frame}
+\item{data}{data.frame}
 
 \item{type}{plot type (derived from possible_plots() and matches custom function)}
 
@@ -99,17 +99,12 @@ Beatiful violin plot
 }
 \examples{
 create_plot(mtcars, "plot_violin", "mpg", "cyl") |> attributes()
-mtcars |> plot_box(pri = "mpg", sec = "gear")
-mtcars |> plot_box(pri = "mpg", sec="cyl")
+mtcars |> plot_box(pri = "mpg", sec = "cyl", ter = "gear")
 mtcars |>
   default_parsing() |>
   plot_box(pri = "mpg", sec = "cyl", ter = "gear")
-mtcars |>
-  default_parsing() |>
-  plot_box(pri = "mpg", sec = "cyl", ter = "gear",axis.font.family="mono")
 mtcars |> plot_box_single("mpg")
 mtcars |> plot_box_single("mpg","cyl")
-gtsummary::trial |> plot_box_single("age","trt")
 mtcars |> plot_hbars(pri = "carb", sec = "cyl")
 mtcars |> plot_hbars(pri = "carb", sec = NULL)
 mtcars |>
diff --git a/man/wrap_plot_list.Rd b/man/wrap_plot_list.Rd
index bc291dfb..d1e8fd19 100644
--- a/man/wrap_plot_list.Rd
+++ b/man/wrap_plot_list.Rd
@@ -4,22 +4,12 @@
 \alias{wrap_plot_list}
 \title{Wrapping}
 \usage{
-wrap_plot_list(
-  data,
-  tag_levels = NULL,
-  title = NULL,
-  axis.font.family = NULL,
-  ...
-)
+wrap_plot_list(data, tag_levels = NULL)
 }
 \arguments{
 \item{data}{list of ggplot2 objects}
 
 \item{tag_levels}{passed to patchwork::plot_annotation if given. Default is NULL}
-
-\item{title}{panel title}
-
-\item{...}{ignored for argument overflow}
 }
 \value{
 list of ggplot2 objects