2025-09-10 10:19:34 +00:00
<!DOCTYPE html>
<!-- Generated by pkgdown: do not edit by hand --> < html lang = "en" > < head > < meta http-equiv = "Content-Type" content = "text/html; charset=UTF-8" > < meta charset = "utf-8" > < meta http-equiv = "X-UA-Compatible" content = "IE=edge" > < meta name = "viewport" content = "width=device-width, initial-scale=1, shrink-to-fit=no" > < title > Validation module — validation_ui • FreesearchR< / title > <!-- favicons --> < link rel = "icon" type = "image/png" sizes = "96x96" href = "../favicon-96x96.png" > < link rel = "icon" type = "”image/svg+xml”" href = "../favicon.svg" > < link rel = "apple-touch-icon" sizes = "180x180" href = "../apple-touch-icon.png" > < link rel = "icon" sizes = "any" href = "../favicon.ico" > < link rel = "manifest" href = "../site.webmanifest" > < script src = "../deps/jquery-3.6.0/jquery-3.6.0.min.js" > < / script > < meta name = "viewport" content = "width=device-width, initial-scale=1, shrink-to-fit=no" > < link href = "../deps/bootstrap-5.3.1/bootstrap.min.css" rel = "stylesheet" > < script src = "../deps/bootstrap-5.3.1/bootstrap.bundle.min.js" > < / script > < link href = "../deps/Montserrat-0.4.10/font.css" rel = "stylesheet" > < link href = "../deps/Public_Sans-0.4.10/font.css" rel = "stylesheet" > < link href = "../deps/font-awesome-6.5.2/css/all.min.css" rel = "stylesheet" > < link href = "../deps/font-awesome-6.5.2/css/v4-shims.min.css" rel = "stylesheet" > < script src = "../deps/headroom-0.11.0/headroom.min.js" > < / script > < script src = "../deps/headroom-0.11.0/jQuery.headroom.min.js" > < / script > < script src = "../deps/bootstrap-toc-1.0.1/bootstrap-toc.min.js" > < / script > < script src = "../deps/clipboard.js-2.0.11/clipboard.min.js" > < / script > < script src = "../deps/search-1.0.0/autocomplete.jquery.min.js" > < / script > < script src = "../deps/search-1.0.0/fuse.min.js" > < / script > < script src = "../deps/search-1.0.0/mark.min.js" > < / script > <!-- pkgdown --> < script src = "../pkgdown.js" > < / script > < link href = "../extra.css" rel = "stylesheet" > < meta property = "og:title" content = "Validation module — validation_ui" > < meta name = "description" content = "Check that a dataset respect some validation expectations." > < meta property = "og:description" content = "Check that a dataset respect some validation expectations." > < meta property = "og:image" content = "https://agdamsbo.github.io/FreesearchR/logo.png" > < script defer src = "https://stats.freesearchr.org/script.js" data-website-id = "85bfd1e8-2cbe-4a4a-aa34-1dfb2960905b" > < / script > < / head > < body >
< a href = "#main" class = "visually-hidden-focusable" > Skip to contents< / a >
< nav class = "navbar navbar-expand-lg fixed-top bg-primary" data-bs-theme = "dark" aria-label = "Site navigation" > < div class = "container" >
< a class = "navbar-brand me-2" href = "../index.html" > FreesearchR< / a >
2025-11-19 13:25:44 +00:00
< small class = "nav-text text-muted me-auto" data-bs-toggle = "tooltip" data-bs-placement = "bottom" title = "" > 25.11.2< / small >
2025-09-10 10:19:34 +00:00
< button class = "navbar-toggler" type = "button" data-bs-toggle = "collapse" data-bs-target = "#navbar" aria-controls = "navbar" aria-expanded = "false" aria-label = "Toggle navigation" >
< span class = "navbar-toggler-icon" > < / span >
< / button >
< div id = "navbar" class = "collapse navbar-collapse ms-3" >
< ul class = "navbar-nav me-auto" > < li class = "nav-item" > < a class = "nav-link" href = "../articles/FreesearchR.html" > Get started< / a > < / li >
< li class = "active nav-item" > < a class = "nav-link" href = "../reference/index.html" > Reference< / a > < / li >
< li class = "nav-item dropdown" >
< button class = "nav-link dropdown-toggle" type = "button" id = "dropdown-articles" data-bs-toggle = "dropdown" aria-expanded = "false" aria-haspopup = "true" > Articles< / button >
< ul class = "dropdown-menu" aria-labelledby = "dropdown-articles" > < li > < a class = "dropdown-item" href = "../articles/data-types.html" > Data types< / a > < / li >
< li > < a class = "dropdown-item" href = "../articles/missingness.html" > Missingness in data< / a > < / li >
< li > < a class = "dropdown-item" href = "../articles/session.html" > Session info< / a > < / li >
< li > < a class = "dropdown-item" href = "../articles/visuals.html" > On visuals< / a > < / li >
< / ul > < / li >
< li class = "nav-item" > < a class = "nav-link" href = "../ROADMAP.html" > Roadmap< / a > < / li >
< li class = "nav-item" > < a class = "nav-link" href = "../QA.html" > Q& A< / a > < / li >
< li class = "nav-item" > < a class = "nav-link" href = "../news/index.html" > Changelog< / a > < / li >
< / ul > < ul class = "navbar-nav" > < li class = "nav-item" > < form class = "form-inline" role = "search" >
< input class = "form-control" type = "search" name = "search-input" id = "search-input" autocomplete = "off" aria-label = "Search site" placeholder = "Search for" data-search-index = "../search.json" > < / form > < / li >
< li class = "nav-item" > < a class = "external-link nav-link" href = "https://github.com/agdamsbo/FreesearchR/" aria-label = "GitHub" > < span class = "fa fab fa-github fa-lg" > < / span > < / a > < / li >
< / ul > < / div >
< / div >
< / nav > < div class = "container template-reference-topic" >
< div class = "row" >
< main id = "main" class = "col-md-9" > < div class = "page-header" >
< img src = "../logo.png" class = "logo" alt = "" > < h1 > Validation module< / h1 >
< small class = "dont-index" > Source: < a href = "https://github.com/agdamsbo/FreesearchR/blob/main/R/validation.R" class = "external-link" > < code > R/validation.R< / code > < / a > < / small >
< div class = "d-none name" > < code > validation.Rd< / code > < / div >
< / div >
< div class = "ref-description section level2" >
< p > Check that a dataset respect some validation expectations.< / p >
< / div >
< div class = "section level2" >
< h2 id = "ref-usage" > Usage< a class = "anchor" aria-label = "anchor" href = "#ref-usage" > < / a > < / h2 >
< div class = "sourceCode" > < pre class = "sourceCode r" > < code > < span > < span class = "fu" > validation_ui< / span > < span class = "op" > (< / span > < span class = "va" > id< / span > , max_height < span class = "op" > =< / span > < span class = "cn" > NULL< / span > , < span class = "va" > ...< / span > < span class = "op" > )< / span > < / span >
< span > < / span >
< span > < span class = "fu" > validation_server< / span > < span class = "op" > (< / span > < span class = "va" > id< / span > , < span class = "va" > data< / span > < span class = "op" > )< / span > < / span > < / code > < / pre > < / div >
< / div >
< div class = "section level2" >
< h2 id = "arguments" > Arguments< a class = "anchor" aria-label = "anchor" href = "#arguments" > < / a > < / h2 >
< dl > < dt id = "arg-id" > id< a class = "anchor" aria-label = "anchor" href = "#arg-id" > < / a > < / dt >
< dd > < p > Module's ID.< / p > < / dd >
< dt id = "arg-max-height" > max_height< a class = "anchor" aria-label = "anchor" href = "#arg-max-height" > < / a > < / dt >
< dd > < p > Maximum height for validation results element, useful if you have many rules.< / p > < / dd >
< dt id = "arg--" > ...< a class = "anchor" aria-label = "anchor" href = "#arg--" > < / a > < / dt >
< dd > < p > Arguments passed to < code > actionButton< / code > or < code > uiOutput< / code > depending on display mode,
you cannot use < code > inputId< / code > /< code > outputId< / code > , < code > label< / code > or < code > icon< / code > (button only).< / p > < / dd >
< dt id = "arg-data" > data< a class = "anchor" aria-label = "anchor" href = "#arg-data" > < / a > < / dt >
< dd > < p > a < code > reactive< / code > function returning a < code > data.frame< / code > .< / p > < / dd >
< / dl > < / div >
< div class = "section level2" >
< h2 id = "value" > Value< a class = "anchor" aria-label = "anchor" href = "#value" > < / a > < / h2 >
< ul > < li > < p > UI: HTML tags that can be included in shiny's UI< / p > < / li >
< li > < p > Server: a < code > list< / code > with two slots:< / p > < ul > < li > < p > < strong > status< / strong > : a < code > reactive< / code > function returning the best status available between < code > "OK"< / code > , < code > "Failed"< / code > or < code > "Error"< / code > .< / p > < / li >
< li > < p > < strong > details< / strong > : a < code > reactive< / code > function returning a < code > list< / code > with validation details.< / p > < / li >
< / ul > < / li >
< / ul > < / div >
< div class = "section level2" >
< h2 id = "ref-examples" > Examples< a class = "anchor" aria-label = "anchor" href = "#ref-examples" > < / a > < / h2 >
< div class = "sourceCode" > < pre class = "sourceCode r" > < code > < span class = "r-in" > < span > < span class = "co" > #' Data and analyses validation demo< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "co" > #'< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "co" > #' @returns< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "co" > #' @export< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "co" > #'< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "co" > #' @examples< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "co" > #' \dontrun{< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "co" > #' validation_demo_app()< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "co" > #' }< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "va" > validation_demo_app< / span > < span class = "op" > < -< / span > < span class = "kw" > function< / span > < span class = "op" > (< / span > < span class = "op" > )< / span > < span class = "op" > {< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "va" > ui< / span > < span class = "op" > < -< / span > < span class = "fu" > shiny< / span > < span class = "fu" > ::< / span > < span class = "fu" > < a href = "https://rdrr.io/pkg/shiny/man/fluidPage.html" class = "external-link" > fluidPage< / a > < / span > < span class = "op" > (< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "fu" > shiny< / span > < span class = "fu" > ::< / span > < span class = "va" > < a href = "https://rstudio.github.io/htmltools/reference/builder.html" class = "external-link" > tags< / a > < / span > < span class = "op" > $< / span > < span class = "fu" > h2< / span > < span class = "op" > (< / span > < span class = "st" > "Validation"< / span > < span class = "op" > )< / span > ,< / span > < / span >
< span class = "r-in" > < span > < span class = "fu" > IDEAFilter< / span > < span class = "fu" > ::< / span > < span class = "fu" > < a href = "https://biogen-inc.github.io/IDEAFilter/reference/IDEAFilter_ui.html" class = "external-link" > IDEAFilter_ui< / a > < / span > < span class = "op" > (< / span > < span class = "st" > "data_filter"< / span > < span class = "op" > )< / span > ,< / span > < / span >
< span class = "r-in" > < span > < span class = "fu" > shiny< / span > < span class = "fu" > ::< / span > < span class = "fu" > < a href = "https://rstudio.github.io/htmltools/reference/builder.html" class = "external-link" > br< / a > < / span > < span class = "op" > (< / span > < span class = "op" > )< / span > ,< / span > < / span >
< span class = "r-in" > < span > < span class = "fu" > DT< / span > < span class = "fu" > ::< / span > < span class = "fu" > < a href = "https://rdrr.io/pkg/DT/man/dataTableOutput.html" class = "external-link" > DTOutput< / a > < / span > < span class = "op" > (< / span > < span class = "st" > "data_final"< / span > < span class = "op" > )< / span > ,< / span > < / span >
< span class = "r-in" > < span > < span class = "fu" > shiny< / span > < span class = "fu" > ::< / span > < span class = "fu" > < a href = "https://rstudio.github.io/htmltools/reference/builder.html" class = "external-link" > br< / a > < / span > < span class = "op" > (< / span > < span class = "op" > )< / span > ,< / span > < / span >
< span class = "r-in" > < span > < span class = "fu" > validation_ui< / span > < span class = "op" > (< / span > < span class = "st" > "validation_demo_2"< / span > < span class = "op" > )< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "op" > )< / span > < / span > < / span >
< span class = "r-in" > < span > < / span > < / span >
< span class = "r-in" > < span > < span class = "va" > server< / span > < span class = "op" > < -< / span > < span class = "kw" > function< / span > < span class = "op" > (< / span > < span class = "va" > input< / span > , < span class = "va" > output< / span > , < span class = "va" > session< / span > < span class = "op" > )< / span > < span class = "op" > {< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "va" > rv< / span > < span class = "op" > < -< / span > < span class = "fu" > shiny< / span > < span class = "fu" > ::< / span > < span class = "fu" > < a href = "https://rdrr.io/pkg/shiny/man/reactiveValues.html" class = "external-link" > reactiveValues< / a > < / span > < span class = "op" > (< / span > < / span > < / span >
< span class = "r-in" > < span > data_original < span class = "op" > =< / span > < span class = "fu" > shiny< / span > < span class = "fu" > ::< / span > < span class = "fu" > < a href = "https://rdrr.io/pkg/shiny/man/reactive.html" class = "external-link" > reactive< / a > < / span > < span class = "op" > (< / span > < span class = "va" > mtcars< / span > < span class = "op" > )< / span > ,< / span > < / span >
< span class = "r-in" > < span > data_filtered < span class = "op" > =< / span > < span class = "cn" > NULL< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "op" > )< / span > < / span > < / span >
< span class = "r-in" > < span > < / span > < / span >
< span class = "r-in" > < span > < span class = "va" > rv_validation< / span > < span class = "op" > < -< / span > < span class = "fu" > shiny< / span > < span class = "fu" > ::< / span > < span class = "fu" > < a href = "https://rdrr.io/pkg/shiny/man/reactiveValues.html" class = "external-link" > reactiveValues< / a > < / span > < span class = "op" > (< / span > < / span > < / span >
< span class = "r-in" > < span > obs_filter < span class = "op" > =< / span > < span class = "cn" > NULL< / span > ,< / span > < / span >
< span class = "r-in" > < span > vars_filter < span class = "op" > =< / span > < span class = "cn" > NULL< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "op" > )< / span > < / span > < / span >
< span class = "r-in" > < span > < / span > < / span >
< span class = "r-in" > < span > < span class = "va" > data_filter< / span > < span class = "op" > < -< / span > < span class = "fu" > IDEAFilter< / span > < span class = "fu" > ::< / span > < span class = "fu" > < a href = "https://biogen-inc.github.io/IDEAFilter/reference/IDEAFilter.html" class = "external-link" > IDEAFilter< / a > < / span > < span class = "op" > (< / span > < / span > < / span >
< span class = "r-in" > < span > id < span class = "op" > =< / span > < span class = "st" > "data_filter"< / span > ,< / span > < / span >
< span class = "r-in" > < span > data < span class = "op" > =< / span > < span class = "va" > mtcars< / span > ,< / span > < / span >
< span class = "r-in" > < span > verbose < span class = "op" > =< / span > < span class = "cn" > TRUE< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "op" > )< / span > < / span > < / span >
< span class = "r-in" > < span > < / span > < / span >
< span class = "r-in" > < span > < span class = "fu" > shiny< / span > < span class = "fu" > ::< / span > < span class = "fu" > < a href = "https://rdrr.io/pkg/shiny/man/observeEvent.html" class = "external-link" > observeEvent< / a > < / span > < span class = "op" > (< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "fu" > data_filter< / span > < span class = "op" > (< / span > < span class = "op" > )< / span > ,< / span > < / span >
< span class = "r-in" > < span > < span class = "op" > {< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "va" > rv< / span > < span class = "op" > $< / span > < span class = "va" > data_filtered< / span > < span class = "op" > < -< / span > < span class = "fu" > data_filter< / span > < span class = "op" > (< / span > < span class = "op" > )< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "op" > }< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "op" > )< / span > < / span > < / span >
< span class = "r-in" > < span > < / span > < / span >
< span class = "r-in" > < span > < span class = "va" > output< / span > < span class = "op" > $< / span > < span class = "va" > data_final< / span > < span class = "op" > < -< / span > < span class = "fu" > DT< / span > < span class = "fu" > ::< / span > < span class = "fu" > < a href = "https://rdrr.io/pkg/DT/man/dataTableOutput.html" class = "external-link" > renderDT< / a > < / span > < span class = "op" > (< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "fu" > data_filter< / span > < span class = "op" > (< / span > < span class = "op" > )< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "op" > )< / span > < / span > < / span >
< span class = "r-in" > < span > < / span > < / span >
< span class = "r-in" > < span > < span class = "fu" > shiny< / span > < span class = "fu" > ::< / span > < span class = "fu" > < a href = "https://rdrr.io/pkg/shiny/man/observeEvent.html" class = "external-link" > observeEvent< / a > < / span > < span class = "op" > (< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "fu" > < a href = "https://rdrr.io/r/base/list.html" class = "external-link" > list< / a > < / span > < span class = "op" > (< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "fu" > data_filter< / span > < span class = "op" > (< / span > < span class = "op" > )< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "op" > )< / span > ,< / span > < / span >
< span class = "r-in" > < span > < span class = "op" > {< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "va" > to_make_validation< / span > < span class = "op" > < -< / span > < span class = "fu" > data_filter< / span > < span class = "op" > (< / span > < span class = "op" > )< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "co" > ## Validation< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "kw" > if< / span > < span class = "op" > (< / span > < span class = "op" > !< / span > < span class = "fu" > < a href = "https://rdrr.io/r/base/NULL.html" class = "external-link" > is.null< / a > < / span > < span class = "op" > (< / span > < span class = "va" > to_make_validation< / span > < span class = "op" > )< / span > < span class = "op" > )< / span > < span class = "op" > {< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "va" > validation< / span > < span class = "op" > < -< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "fu" > < a href = "make_validation.html" > make_validation< / a > < / span > < span class = "op" > (< / span > < / span > < / span >
< span class = "r-in" > < span > ls < span class = "op" > =< / span > < span class = "fu" > < a href = "validation_lib.html" > validation_lib< / a > < / span > < span class = "op" > (< / span > < span class = "st" > "obs_filter"< / span > < span class = "op" > )< / span > ,< / span > < / span >
< span class = "r-in" > < span > < span class = "fu" > < a href = "https://rdrr.io/r/base/list.html" class = "external-link" > list< / a > < / span > < span class = "op" > (< / span > < / span > < / span >
< span class = "r-in" > < span > x < span class = "op" > =< / span > < span class = "va" > mtcars< / span > ,< / span > < / span >
< span class = "r-in" > < span > y < span class = "op" > =< / span > < span class = "va" > to_make_validation< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "op" > )< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "op" > )< / span > < / span > < / span >
< span class = "r-in" > < span > < / span > < / span >
< span class = "r-in" > < span > < span class = "va" > rv_validation< / span > < span class = "op" > $< / span > < span class = "va" > vars_filter< / span > < span class = "op" > < -< / span > < span class = "va" > validation< / span > < / span > < / span >
< span class = "r-in" > < span > < / span > < / span >
< span class = "r-in" > < span > < span class = "fu" > validation_server< / span > < span class = "op" > (< / span > id < span class = "op" > =< / span > < span class = "st" > "validation_demo_2"< / span > , data < span class = "op" > =< / span > < span class = "va" > rv_validation< / span > < span class = "op" > $< / span > < span class = "va" > vars_filter< / span > < span class = "op" > )< / span > < / span > < / span >
< span class = "r-in" > < span > < / span > < / span >
< span class = "r-in" > < span > < span class = "op" > }< / span > < / span > < / span >
< span class = "r-in" > < span > < / span > < / span >
< span class = "r-in" > < span > < / span > < / span >
< span class = "r-in" > < span > < span class = "op" > }< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "op" > )< / span > < / span > < / span >
< span class = "r-in" > < span > < / span > < / span >
< span class = "r-in" > < span > < span class = "co" > # shiny::observeEvent(< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "co" > # list(< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "co" > # shiny::reactive(rv_validation$vars_filter)(),< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "co" > # data_filter()< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "co" > # ),< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "co" > # {< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "co" > # # browser()< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "co" > # # to_make_alert < - shiny::isolate(rv_validation$vars_filter)< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "co" > # to_make_alert < - shiny::reactive(rv_validation$vars_filter)()< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "co" > # if (!is.null(rv_validation$vars_filter)) {< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "co" > # validation_server(id = "validation_demo_2", data = to_make_alert)< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "co" > # }< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "co" > # }< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "co" > # )< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "op" > }< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "fu" > shiny< / span > < span class = "fu" > ::< / span > < span class = "fu" > < a href = "https://rdrr.io/pkg/shiny/man/shinyApp.html" class = "external-link" > shinyApp< / a > < / span > < span class = "op" > (< / span > < span class = "va" > ui< / span > , < span class = "va" > server< / span > < span class = "op" > )< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "op" > }< / span > < / span > < / span >
< span class = "r-in" > < span > < / span > < / span >
< span class = "r-in" > < span > < / span > < / span >
< span class = "r-in" > < span > < span class = "co" > #' Title< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "co" > #'< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "co" > #' @returns< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "co" > #' @export< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "co" > #'< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "co" > #' @examples< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "co" > #' validation_nr_demo_app()< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "va" > validation_nr_demo_app< / span > < span class = "op" > < -< / span > < span class = "kw" > function< / span > < span class = "op" > (< / span > < span class = "op" > )< / span > < span class = "op" > {< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "va" > ui< / span > < span class = "op" > < -< / span > < span class = "fu" > shiny< / span > < span class = "fu" > ::< / span > < span class = "fu" > < a href = "https://rdrr.io/pkg/shiny/man/fluidPage.html" class = "external-link" > fluidPage< / a > < / span > < span class = "op" > (< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "fu" > shiny< / span > < span class = "fu" > ::< / span > < span class = "va" > < a href = "https://rstudio.github.io/htmltools/reference/builder.html" class = "external-link" > tags< / a > < / span > < span class = "op" > $< / span > < span class = "fu" > h2< / span > < span class = "op" > (< / span > < span class = "st" > "Validation"< / span > < span class = "op" > )< / span > ,< / span > < / span >
< span class = "r-in" > < span > < span class = "fu" > shiny< / span > < span class = "fu" > ::< / span > < span class = "fu" > < a href = "https://rstudio.github.io/htmltools/reference/builder.html" class = "external-link" > br< / a > < / span > < span class = "op" > (< / span > < span class = "op" > )< / span > ,< / span > < / span >
< span class = "r-in" > < span > < span class = "fu" > validation_ui< / span > < span class = "op" > (< / span > < span class = "st" > "validation_demo_1"< / span > , max_height < span class = "op" > =< / span > < span class = "st" > "30px"< / span > < span class = "op" > )< / span > ,< / span > < / span >
< span class = "r-in" > < span > < span class = "fu" > shiny< / span > < span class = "fu" > ::< / span > < span class = "fu" > < a href = "https://rstudio.github.io/htmltools/reference/builder.html" class = "external-link" > br< / a > < / span > < span class = "op" > (< / span > < span class = "op" > )< / span > ,< / span > < / span >
< span class = "r-in" > < span > < span class = "fu" > validation_ui< / span > < span class = "op" > (< / span > < span class = "st" > "validation_demo_2"< / span > < span class = "op" > )< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "op" > )< / span > < / span > < / span >
< span class = "r-in" > < span > < / span > < / span >
< span class = "r-in" > < span > < span class = "va" > server< / span > < span class = "op" > < -< / span > < span class = "kw" > function< / span > < span class = "op" > (< / span > < span class = "va" > input< / span > , < span class = "va" > output< / span > , < span class = "va" > session< / span > < span class = "op" > )< / span > < span class = "op" > {< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "va" > df_original< / span > < span class = "op" > < -< / span > < span class = "va" > mtcars< / span > < / span > < / span >
< span class = "r-in" > < span > < / span > < / span >
< span class = "r-in" > < span > < span class = "va" > df_obs< / span > < span class = "op" > < -< / span > < span class = "va" > mtcars< / span > < span class = "op" > |> < / span > < span class = "fu" > dplyr< / span > < span class = "fu" > ::< / span > < span class = "fu" > < a href = "https://dplyr.tidyverse.org/reference/filter.html" class = "external-link" > filter< / a > < / span > < span class = "op" > (< / span > < span class = "va" > mpg< / span > < span class = "op" > > < / span > < span class = "fl" > 20< / span > < span class = "op" > )< / span > < / span > < / span >
< span class = "r-in" > < span > < / span > < / span >
< span class = "r-in" > < span > < span class = "va" > df_vars< / span > < span class = "op" > < -< / span > < span class = "va" > df_obs< / span > < span class = "op" > [< / span > < span class = "fl" > 1< / span > < span class = "op" > :< / span > < span class = "fl" > 6< / span > < span class = "op" > ]< / span > < / span > < / span >
< span class = "r-in" > < span > < / span > < / span >
< span class = "r-in" > < span > < span class = "va" > val1< / span > < span class = "op" > < -< / span > < span class = "fu" > purrr< / span > < span class = "fu" > ::< / span > < span class = "fu" > < a href = "https://purrr.tidyverse.org/reference/map2.html" class = "external-link" > map2< / a > < / span > < span class = "op" > (< / span > < / span > < / span >
< span class = "r-in" > < span > .x < span class = "op" > =< / span > < span class = "fu" > < a href = "validation_lib.html" > validation_lib< / a > < / span > < span class = "op" > (< / span > < span class = "op" > )< / span > < span class = "op" > [< / span > < span class = "fl" > 1< / span > < span class = "op" > ]< / span > ,< / span > < / span >
< span class = "r-in" > < span > .y < span class = "op" > =< / span > < span class = "fu" > < a href = "https://rdrr.io/r/base/list.html" class = "external-link" > list< / a > < / span > < span class = "op" > (< / span > < span class = "fu" > < a href = "https://rdrr.io/r/base/list.html" class = "external-link" > list< / a > < / span > < span class = "op" > (< / span > x < span class = "op" > =< / span > < span class = "va" > df_original< / span > , y < span class = "op" > =< / span > < span class = "va" > df_obs< / span > < span class = "op" > )< / span > < span class = "op" > )< / span > ,< / span > < / span >
< span class = "r-in" > < span > < span class = "va" > make_validation< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "op" > )< / span > < / span > < / span >
< span class = "r-in" > < span > < / span > < / span >
< span class = "r-in" > < span > < span class = "va" > val2< / span > < span class = "op" > < -< / span > < span class = "fu" > < a href = "make_validation.html" > make_validation< / a > < / span > < span class = "op" > (< / span > < / span > < / span >
< span class = "r-in" > < span > ls < span class = "op" > =< / span > < span class = "fu" > < a href = "validation_lib.html" > validation_lib< / a > < / span > < span class = "op" > (< / span > < span class = "op" > )< / span > < span class = "op" > [[< / span > < span class = "fl" > 2< / span > < span class = "op" > ]< / span > < span class = "op" > ]< / span > ,< / span > < / span >
< span class = "r-in" > < span > < span class = "fu" > < a href = "https://rdrr.io/r/base/list.html" class = "external-link" > list< / a > < / span > < span class = "op" > (< / span > x < span class = "op" > =< / span > < span class = "va" > df_original< / span > , y < span class = "op" > =< / span > < span class = "va" > df_vars< / span > < span class = "op" > )< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "op" > )< / span > < / span > < / span >
< span class = "r-in" > < span > < / span > < / span >
< span class = "r-in" > < span > < span class = "fu" > validation_server< / span > < span class = "op" > (< / span > id < span class = "op" > =< / span > < span class = "st" > "validation_demo_1"< / span > , data < span class = "op" > =< / span > < span class = "va" > val1< / span > < span class = "op" > )< / span > < / span > < / span >
< span class = "r-in" > < span > < / span > < / span >
< span class = "r-in" > < span > < span class = "fu" > validation_server< / span > < span class = "op" > (< / span > id < span class = "op" > =< / span > < span class = "st" > "validation_demo_2"< / span > , data < span class = "op" > =< / span > < span class = "va" > val2< / span > < span class = "op" > )< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "op" > }< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "fu" > shiny< / span > < span class = "fu" > ::< / span > < span class = "fu" > < a href = "https://rdrr.io/pkg/shiny/man/shinyApp.html" class = "external-link" > shinyApp< / a > < / span > < span class = "op" > (< / span > < span class = "va" > ui< / span > , < span class = "va" > server< / span > < span class = "op" > )< / span > < / span > < / span >
< span class = "r-in" > < span > < span class = "op" > }< / span > < / span > < / span >
< / code > < / pre > < / div >
< / div >
< / main > < aside class = "col-md-3" > < nav id = "toc" aria-label = "Table of contents" > < h2 > On this page< / h2 >
< / nav > < / aside > < / div >
< footer > < div class = "pkgdown-footer-left" >
2025-11-19 13:25:44 +00:00
< p > Site built with < a href = "https://pkgdown.r-lib.org/" class = "external-link" > pkgdown< / a > 2.2.0.< / p >
2025-09-10 10:19:34 +00:00
< / div >
< div class = "pkgdown-footer-right" >
< p > Developed by Andreas Gammelgaard Damsbo. Provided without < strong > any warranty< / strong > .< / p >
< / div >
< / footer > < / div >
< / body > < / html >