inst/tests/test-pisa.R

context("PISA")

test_that("PISA data loads from package", {
# 	data(pisa.school)
# 	expect_that(school.orig, is_a('data.frame'))
# 	expect_that(ncol(school.orig), equals(247))
# 	expect_that(nrow(school.orig), equals(17145))
})

Try the multilevelPSA package in your browser

Any scripts or data that you put into this service are public.

multilevelPSA documentation built on May 1, 2019, 9:19 p.m.