From 2e4792c17342944239fbce84617258db1716494d Mon Sep 17 00:00:00 2001 From: agdamsbo <43278243+agdamsbo@users.noreply.github.com> Date: Wed, 10 Sep 2025 10:19:34 +0000 Subject: [PATCH] =?UTF-8?q?Deploying=20to=20gh-pages=20from=20@=20agdamsbo?= =?UTF-8?q?/FreesearchR@545874f71bd45bd358ad7970c080c0740ad37d85=20?= =?UTF-8?q?=F0=9F=9A=80?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- 404.html | 2 +- CODE_OF_CONDUCT.html | 4 +- LICENSE.html | 4 +- QA.html | 4 +- ROADMAP.html | 4 +- SESSION.html | 300 +++++++--------- articles/FreesearchR.html | 4 +- articles/data-types.html | 4 +- articles/index.html | 2 +- articles/missingness.html | 4 +- articles/session.html | 330 +++++++----------- articles/visuals.html | 4 +- authors.html | 8 +- ...6t8kCHKm4532VJOt5-QNFgpCtr6Hw0aXpsog.woff2 | Bin 11924 -> 11940 bytes ...6t8kCHKm4532VJOt5-QNFgpCtr6Hw2aXpsog.woff2 | Bin 7916 -> 7896 bytes ...6t8kCHKm4532VJOt5-QNFgpCtr6Hw3aXpsog.woff2 | Bin 32256 -> 32272 bytes ...1_i6t8kCHKm4532VJOt5-QNFgpCtr6Hw5aXo.woff2 | Bin 18792 -> 18780 bytes ...6t8kCHKm4532VJOt5-QNFgpCtr6Hw9aXpsog.woff2 | Bin 10976 -> 10980 bytes index.html | 2 +- news/index.html | 10 +- pkgdown.yml | 2 +- reference/FreesearchR_palette.html | 4 +- reference/add_class_icon.html | 4 +- reference/add_sparkline.html | 4 +- reference/align_axes.html | 4 +- reference/all_but.html | 4 +- reference/append_column.html | 4 +- reference/append_list.html | 4 +- reference/argsstring2list.html | 4 +- reference/baseline_table.html | 4 +- reference/class_icons.html | 4 +- reference/clean_common_axis.html | 4 +- reference/clean_date.html | 4 +- reference/clean_sep.html | 4 +- reference/columnSelectInput.html | 4 +- reference/compare_missings.html | 4 +- reference/contrast_text.html | 4 +- reference/create-column.html | 10 +- reference/create_baseline.html | 4 +- reference/create_log_tics.html | 4 +- reference/create_overview_datagrid.html | 4 +- reference/custom_theme.html | 4 +- reference/cut-variable.html | 6 +- reference/cut_var.html | 4 +- reference/data-correlations.html | 4 +- reference/data-import.html | 4 +- reference/data-missings.html | 4 +- reference/data-plots.html | 4 +- reference/data-summary.html | 4 +- reference/data_description.html | 4 +- reference/data_summary_gather.html | 4 +- reference/data_type.html | 4 +- reference/data_type_filter.html | 4 +- reference/data_types.html | 4 +- reference/default_format_arguments.html | 4 +- reference/default_parsing.html | 4 +- reference/dim_change_call.html | 94 +++++ reference/drop_empty_event.html | 4 +- reference/expression_string.html | 4 +- reference/factorize.html | 4 +- reference/file_export.html | 4 +- reference/format_writer.html | 4 +- reference/get_fun_options.html | 4 +- reference/get_label.html | 4 +- reference/get_plot_options.html | 4 +- reference/get_var_icon.html | 4 +- reference/getfun.html | 6 +- reference/gg_theme_export.html | 4 +- reference/gg_theme_shiny.html | 4 +- reference/ggeulerr.html | 4 +- reference/grepl_fix.html | 4 +- reference/if_not_missing.html | 4 +- reference/import-file-type.html | 4 +- reference/import-file.html | 6 +- reference/import-file_module.html | 4 +- reference/index.html | 50 ++- reference/index_embed.html | 4 +- reference/is_any_class.html | 4 +- reference/is_consecutive.html | 4 +- reference/is_datetime.html | 4 +- reference/is_identical_to_previous.html | 4 +- reference/is_valid_redcap_url.html | 4 +- reference/is_valid_token.html | 4 +- reference/launch_FreesearchR.html | 4 +- reference/limit_log.html | 4 +- reference/line_break.html | 4 +- reference/make_validation.html | 127 +++++++ reference/make_validation_alerts.html | 82 +++++ reference/merge_expression.html | 4 +- reference/merge_long.html | 4 +- reference/missing_fraction.html | 4 +- reference/missings_apex_plot.html | 4 +- reference/missings_validate.html | 95 +++++ reference/modify_qmd.html | 4 +- reference/obs_filter_validate.html | 90 +++++ reference/overview_vars.html | 4 +- reference/pipe_string.html | 4 +- reference/plot.tbl_regression.html | 4 +- reference/plot_euler.html | 4 +- reference/plot_euler_single.html | 4 +- reference/plot_sankey_single.html | 4 +- reference/possible_functions.html | 4 +- reference/possible_plots.html | 4 +- reference/read_input.html | 4 +- reference/redcap_read_shiny_module.html | 4 +- reference/regression_model.html | 4 +- reference/regression_table.html | 4 +- reference/regression_table_create.html | 4 +- reference/remove_empty_attr.html | 4 +- reference/remove_empty_cols.html | 4 +- reference/remove_nested_list.html | 4 +- reference/repeated_instruments.html | 4 +- reference/selectInputIcon.html | 4 +- reference/set_column_label.html | 4 +- reference/show_data.html | 4 +- reference/simple_snake.html | 4 +- reference/sort_by.html | 4 +- reference/specify_qmd_format.html | 4 +- reference/subset_types.html | 4 +- reference/supported_functions.html | 4 +- reference/supported_plots.html | 4 +- reference/symmetrical_scale_x_log10.html | 4 +- reference/tbl_merge.html | 4 +- reference/type_icons.html | 4 +- reference/ui_elements.html | 4 +- reference/unique_short.html | 4 +- reference/update-factor.html | 8 +- reference/update-variables.html | 4 +- reference/update_variables_datagrid.html | 4 +- reference/validation.html | 242 +++++++++++++ reference/validation_lib.html | 94 +++++ reference/validation_server.html | 8 + reference/vars_filter_validate.html | 98 ++++++ reference/vectorSelectInput.html | 4 +- reference/vertical_stacked_bars.html | 4 +- reference/visual_summary-1.png | Bin 47666 -> 47705 bytes reference/visual_summary-2.png | Bin 47699 -> 47704 bytes reference/visual_summary.html | 4 +- reference/wide2long.html | 164 ++++----- reference/wrap_plot_list.html | 4 +- reference/write_quarto.html | 4 +- search.json | 2 +- sitemap.xml | 8 + 143 files changed, 1570 insertions(+), 716 deletions(-) create mode 100644 reference/dim_change_call.html create mode 100644 reference/make_validation.html create mode 100644 reference/make_validation_alerts.html create mode 100644 reference/missings_validate.html create mode 100644 reference/obs_filter_validate.html create mode 100644 reference/validation.html create mode 100644 reference/validation_lib.html create mode 100644 reference/validation_server.html create mode 100644 reference/vars_filter_validate.html diff --git a/404.html b/404.html index 1a9c252..8a39c7e 100644 --- a/404.html +++ b/404.html @@ -30,7 +30,7 @@ FreesearchR - 25.8.2 + 25.8.3 + + + + + +
+
+
+

Dimensions validation

+ Source: R/validation.R +
dim_change_call.Rd
+
+ +
+

Dimensions validation

+
+ +
+

Usage

+ 
dim_change_call(before, after, fun)
+
+ +
+

Arguments

+ + +
before
+

data before

+ + +
after
+

data after

+ + +
fun
+

dimension function. ncol or nrow

+ +
+
+

Value

+

data.frame

+
+ +
+ + +
+

Site built with pkgdown 2.1.3.

+
+ +
+

Developed by Andreas Gammelgaard Damsbo. Provided without any warranty.

+
+ +
+ + + + + + + diff --git a/reference/drop_empty_event.html b/reference/drop_empty_event.html index fadccdd..aa7c19a 100644 --- a/reference/drop_empty_event.html +++ b/reference/drop_empty_event.html @@ -7,7 +7,7 @@ FreesearchR - 25.8.2 + 25.8.3 + + + + + +
+
+
+

Create validation data.frame

+ Source: R/validation.R +
make_validation.Rd
+
+ +
+

Create validation data.frame

+
+ +
+

Usage

+ 
make_validation(ls, ...)
+
+ +
+

Arguments

+ + +
ls
+

validation list

+ + +
...
+

magic dots

+ +
+
+

Value

+

data.frame

+
+ +
+

Examples

+ 
i18n <- shiny.i18n::Translator$new(translation_csvs_path = here::here("inst/translations"))
+#> Warning: You didn't specify config translation yaml file. Default settings are used.
+i18n$set_translation_language("en")
+df_original <- mtcars
+df_original[1,2:4] <- NA
+df_obs <- df_original |> dplyr::filter(carb==4)
+df_vars <- df_original[1:7]
+val <- purrr::map2(
+  .x = validation_lib(),
+  .y = list(
+  list(x = df_original, y = df_obs),
+  list(x = df_original, y = df_vars),
+  list(x=df_original)),
+  make_validation
+)
+#> Error in validation_lib(): could not find function "validation_lib"
+val |> make_validation_alerts()
+#> Error: object 'val' not found
+
+val2 <- purrr::map2(
+  .x = validation_lib()[2],
+  .y = list(list(x = mtcars, y = mtcars[0])),
+  make_validation
+)
+#> Error in validation_lib(): could not find function "validation_lib"
+val2 |> make_validation_alerts()
+#> Error: object 'val2' not found
+
+val3 <- make_validation(
+  ls = validation_lib()[[2]],
+  list(x = mtcars, y = mtcars[0])
+)
+#> Error in validation_lib(): could not find function "validation_lib"
+
+
+
+ + +
+

Site built with pkgdown 2.1.3.

+
+ +
+

Developed by Andreas Gammelgaard Damsbo. Provided without any warranty.

+
+ +
+ + + + + + + diff --git a/reference/make_validation_alerts.html b/reference/make_validation_alerts.html new file mode 100644 index 0000000..f429594 --- /dev/null +++ b/reference/make_validation_alerts.html @@ -0,0 +1,82 @@ + +Create alert from validation data.frame — make_validation_alerts • FreesearchR + Skip to contents + + +
+
+
+

Create alert from validation data.frame

+ Source: R/validation.R +
make_validation_alerts.Rd
+
+ +
+

Create alert from validation data.frame

+
+ +
+

Usage

+ 
make_validation_alerts(data)
+
+ +
+

Arguments

+ + +
data
+
+ +
+ +
+ + +
+

Site built with pkgdown 2.1.3.

+
+ +
+

Developed by Andreas Gammelgaard Damsbo. Provided without any warranty.

+
+ +
+ + + + + + + diff --git a/reference/merge_expression.html b/reference/merge_expression.html index 542d752..73f2aff 100644 --- a/reference/merge_expression.html +++ b/reference/merge_expression.html @@ -7,7 +7,7 @@ FreesearchR - 25.8.2 + 25.8.3 + + + + + +
+
+
+

Validate function of missingness in data

+ Source: R/validation.R +
missings_validate.Rd
+
+ +
+

Validate function of missingness in data

+
+ +
+

Usage

+ 
missings_validate(data)
+
+ +
+

Arguments

+ + +
data
+

data set

+ +
+
+

Value

+

data.frame

+
+ +
+

Examples

+ 
df <- mtcars
+df[1,2:4] <- NA
+missings_validate(df)
+#>   p_miss
+#> 1   0.85
+
+
+
+ + +
+

Site built with pkgdown 2.1.3.

+
+ +
+

Developed by Andreas Gammelgaard Damsbo. Provided without any warranty.

+
+ +
+ + + + + + + diff --git a/reference/modify_qmd.html b/reference/modify_qmd.html index 3ac395d..dd70005 100644 --- a/reference/modify_qmd.html +++ b/reference/modify_qmd.html @@ -7,7 +7,7 @@ FreesearchR - 25.8.2 + 25.8.3 + + + + + +
+
+
+

Observations filter test wrapper

+ Source: R/validation.R +
obs_filter_validate.Rd
+
+ +
+

Observations filter test wrapper

+
+ +
+

Usage

+ 
obs_filter_validate(before, after)
+
+ +
+

Arguments

+ + +
before
+

data before

+ + +
after
+

data after

+ +
+
+

Value

+

vector

+
+ +
+ + +
+

Site built with pkgdown 2.1.3.

+
+ +
+

Developed by Andreas Gammelgaard Damsbo. Provided without any warranty.

+
+ +
+ + + + + + + diff --git a/reference/overview_vars.html b/reference/overview_vars.html index 9ce9e69..52bf7c5 100644 --- a/reference/overview_vars.html +++ b/reference/overview_vars.html @@ -7,7 +7,7 @@ FreesearchR - 25.8.2 + 25.8.3 + + + + + +
+
+
+

Validation module

+ Source: R/validation.R +
validation.Rd
+
+ +
+

Check that a dataset respect some validation expectations.

+
+ +
+

Usage

+ 
validation_ui(id, max_height = NULL, ...)
+
+validation_server(id, data)
+
+ +
+

Arguments

+ + +
id
+

Module's ID.

+ + +
max_height
+

Maximum height for validation results element, useful if you have many rules.

+ + +
...
+

Arguments passed to actionButton or uiOutput depending on display mode, +you cannot use inputId/outputId, label or icon (button only).

+ + +
data
+

a reactive function returning a data.frame.

+ +
+
+

Value

+ +

  • UI: HTML tags that can be included in shiny's UI

    • +

  • Server: a list with two slots:

    • status: a reactive function returning the best status available between "OK", "Failed" or "Error".

      • +

    • details: a reactive function returning a list with validation details.

      • +
    • +
+ +
+

Examples

+ 
#' Data and analyses validation demo
+#'
+#' @returns
+#' @export
+#'
+#' @examples
+#' \dontrun{
+#' validation_demo_app()
+#' }
+validation_demo_app <- function() {
+  ui <- shiny::fluidPage(
+    shiny::tags$h2("Validation"),
+    IDEAFilter::IDEAFilter_ui("data_filter"),
+    shiny::br(),
+    DT::DTOutput("data_final"),
+    shiny::br(),
+    validation_ui("validation_demo_2")
+  )
+
+  server <- function(input, output, session) {
+    rv <- shiny::reactiveValues(
+      data_original = shiny::reactive(mtcars),
+      data_filtered = NULL
+    )
+
+    rv_validation <- shiny::reactiveValues(
+      obs_filter = NULL,
+      vars_filter = NULL
+    )
+
+    data_filter <- IDEAFilter::IDEAFilter(
+      id = "data_filter",
+      data = mtcars,
+      verbose = TRUE
+    )
+
+    shiny::observeEvent(
+      data_filter(),
+      {
+        rv$data_filtered <- data_filter()
+      }
+    )
+
+    output$data_final <- DT::renderDT(
+      data_filter()
+    )
+
+    shiny::observeEvent(
+      list(
+        data_filter()
+      ),
+      {
+        to_make_validation <- data_filter()
+        ## Validation
+        if (!is.null(to_make_validation)) {
+          validation <-
+            make_validation(
+              ls = validation_lib("obs_filter"),
+              list(
+                x = mtcars,
+                y = to_make_validation
+              )
+            )
+
+        rv_validation$vars_filter <- validation
+
+        validation_server(id = "validation_demo_2", data = rv_validation$vars_filter)
+
+        }
+
+
+      }
+    )
+
+    # shiny::observeEvent(
+    #   list(
+    #     shiny::reactive(rv_validation$vars_filter)(),
+    #     data_filter()
+    #   ),
+    #   {
+    #     # browser()
+    #     # to_make_alert <- shiny::isolate(rv_validation$vars_filter)
+    #     to_make_alert <- shiny::reactive(rv_validation$vars_filter)()
+    #     if (!is.null(rv_validation$vars_filter)) {
+    #       validation_server(id = "validation_demo_2", data = to_make_alert)
+    #     }
+    #   }
+    # )
+  }
+  shiny::shinyApp(ui, server)
+}
+
+
+#' Title
+#'
+#' @returns
+#' @export
+#'
+#' @examples
+#' validation_nr_demo_app()
+validation_nr_demo_app <- function() {
+  ui <- shiny::fluidPage(
+    shiny::tags$h2("Validation"),
+    shiny::br(),
+    validation_ui("validation_demo_1", max_height = "30px"),
+    shiny::br(),
+    validation_ui("validation_demo_2")
+  )
+
+  server <- function(input, output, session) {
+    df_original <- mtcars
+
+    df_obs <- mtcars |> dplyr::filter(mpg > 20)
+
+    df_vars <- df_obs[1:6]
+
+    val1 <- purrr::map2(
+      .x = validation_lib()[1],
+      .y = list(list(x = df_original, y = df_obs)),
+      make_validation
+    )
+
+    val2 <- make_validation(
+      ls = validation_lib()[[2]],
+      list(x = df_original, y = df_vars)
+    )
+
+    validation_server(id = "validation_demo_1", data = val1)
+
+    validation_server(id = "validation_demo_2", data = val2)
+  }
+  shiny::shinyApp(ui, server)
+}
+
+
+
+ + +
+

Site built with pkgdown 2.1.3.

+
+ +
+

Developed by Andreas Gammelgaard Damsbo. Provided without any warranty.

+
+ +
+ + + + + + + diff --git a/reference/validation_lib.html b/reference/validation_lib.html new file mode 100644 index 0000000..1dfb985 --- /dev/null +++ b/reference/validation_lib.html @@ -0,0 +1,94 @@ + +Validation library — validation_lib • FreesearchR + Skip to contents + + +
+
+
+

Validation library

+ Source: R/validation.R +
validation_lib.Rd
+
+ +
+

Validation library

+
+ +
+

Usage

+ 
validation_lib(name = NULL)
+
+ +
+

Arguments

+ + +
name
+

Index name

+ +
+
+

Value

+

list

+
+ +
+

Examples

+ 
validation_lib()
+#> Error in validation_lib(): could not find function "validation_lib"
+validation_lib("missings")
+#> Error in validation_lib("missings"): could not find function "validation_lib"
+
+
+
+ + +
+

Site built with pkgdown 2.1.3.

+
+ +
+

Developed by Andreas Gammelgaard Damsbo. Provided without any warranty.

+
+ +
+ + + + + + + diff --git a/reference/validation_server.html b/reference/validation_server.html new file mode 100644 index 0000000..d053e98 --- /dev/null +++ b/reference/validation_server.html @@ -0,0 +1,8 @@ + + + + + + + + diff --git a/reference/vars_filter_validate.html b/reference/vars_filter_validate.html new file mode 100644 index 0000000..0a29d02 --- /dev/null +++ b/reference/vars_filter_validate.html @@ -0,0 +1,98 @@ + +Variable filter test wrapper — vars_filter_validate • FreesearchR + Skip to contents + + +
+
+
+

Variable filter test wrapper

+ Source: R/validation.R +
vars_filter_validate.Rd
+
+ +
+

Variable filter test wrapper

+
+ +
+

Usage

+ 
vars_filter_validate(before, after)
+
+ +
+

Arguments

+ + +
before
+

data before

+ + +
after
+

data after

+ +
+
+

Value

+

vector

+
+ +
+

Examples

+ 
vars_filter_validate(mtcars, mtcars[1:6])
+#> Error in vars_filter_validate(mtcars, mtcars[1:6]): could not find function "vars_filter_validate"
+vars_filter_validate(mtcars, mtcars[0])
+#> Error in vars_filter_validate(mtcars, mtcars[0]): could not find function "vars_filter_validate"
+
+
+
+ + +
+

Site built with pkgdown 2.1.3.

+
+ +
+

Developed by Andreas Gammelgaard Damsbo. Provided without any warranty.

+
+ +
+ + + + + + + diff --git a/reference/vectorSelectInput.html b/reference/vectorSelectInput.html index 3f0f3c3..ec10d20 100644 --- a/reference/vectorSelectInput.html +++ b/reference/vectorSelectInput.html @@ -7,7 +7,7 @@ FreesearchR - 25.8.2 + 25.8.3