
PICKMDL "first" check
crit_ok.RdCheck whether x13 output is ok according to
the PICKMDL "first" method
Arguments
- sa
A
x13output object
Details
Unlike ok, this function does the actual calculations.
Examples
myseries <- pickmdl_data("myseries")
spec_now <- rjd3x13::x13_spec("rsa3")
spec_a <- rjd3toolkit::set_transform(spec_now,fun="Log")
a <- x13_pickmdl(myseries, spec_a)
spec_b <- rjd3toolkit::set_transform(spec_now,fun="None")
b <- x13_pickmdl(myseries, spec_b)
#> Warning: No model is ok according to criteria
crit_ok(a)
#> [1] TRUE
crit_ok(b)
#> [1] FALSE