tests/testthat/test-mira.R

context("mira")

imp <- mice(nhanes, print = FALSE, maxit = 1, seed = 121, m = 1)
fit <- with(imp, sd(bmi))

test_that("list prints without an error", {
  expect_output(print(fit))
})

Try the mice package in your browser

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

mice documentation built on June 7, 2023, 5:38 p.m.