inst/tinytest/test_domain_check.R

data("retailers", package="validate")

suggest_domain_check(retailers)

rules <- suggest_pos_check(retailers)
expect_equal(length(rules), 7)

rules <- suggest_pos_check(retailers, only_positive = FALSE)
expect_equal(length(rules), 9)
edwindj/validatesuggest documentation built on Oct. 11, 2023, 9:58 p.m.