data-raw/testdata.R

In WorldHealthOrganization/anthroplus: Computation of the WHO 2007 References for School-Age Children and Adolescents (5 to 19 Years)

test_dataset_who2007 <- read.csv("data-raw/survey_who2007_z.csv")
test_dataset_who2007$dob <- NULL
test_dataset_who2007$dov <- NULL
test_dataset_who2007$region <- NULL
test_dataset_who2007$age.mo <- NULL
saveRDS(
  test_dataset_who2007,
  "tests/testthat/test_dataset_who2007.rds",
  version = 3
)