Apply growth screeners to child data

Usage

apply_screeners(
  txt = "",
  session = "",
  format = "1.0",
  ynames = c("hgt", "wgt", "hdc"),
  na.omit = TRUE,
  loc = "",
  ...
)

Arguments

txt: A JSON string, URL or file
session: Alternative to txt. Session key where input data is uploaded on sitehost.
format: String. JSON data schema version number. There are currently three schemas supported: "1.0", "1.1", "2.0" and "3.0". Formats "1.0" and "1.1" are included for backward compatibility only. Use format = "3.0" for new applications.
ynames: Character vector identifying the measures to be screened. By default, ynames = c("hgt", "wgt", "hdc").
na.omit: A logical indicating whether records with a missing x (age) or y (yname) should be removed. Defaults to TRUE.
loc: Alternative to txt. Location where input data is uploaded. Argument loc is deprecated and will disappear in Nov 2022; please use session instead.
...: Ignored

Note

apply_screeners() supersedes screen_growth() and screen_curves().

Examples

fn <- system.file("testdata", "client3.json", package = "james")
apply_screeners(fn)
#>   Categorie CategorieOmschrijving Code
#> 1      1000                Lengte 1031
#> 2      2000               Gewicht 2031
#> 3      3000           Hoofdomtrek 3031
#>                                                                                                                CodeOmschrijving
#> 1 Het advies volgens de JGZ-richtlijn lengtegroei is als volgt: In principe geen verwijzing nodig, naar eigen inzicht handelen.
#> 2 Het advies volgens de JGZ-richtlijn overgewicht is als volgt: In principe geen verwijzing nodig, naar eigen inzicht handelen.
#> 3                                                               In principe geen verwijzing nodig, naar eigen inzicht handelen.
#>   Versie Leeftijd
#> 1 1.23.0    0.167
#> 2 1.23.0    0.167
#> 3 1.23.0    0.167
if (FALSE) { # \dontrun{
# first upload, then screen
library(jamesclient)
r1 <- james_post(path = "data/upload/json", txt = fn)
r2 <- james_post(path = "screeners/apply/json", loc = r1$location)
r3 <- james_post(path = "screeners/apply/json", session = r1$session)
} # }