test_that("n_complete handles 0 cases as I expect",{
expect_equal(n_complete(0), 1)
expect_equal(n_complete(numeric(0)),0)
expect_equal(n_complete(iris[0]),0)
})
test_that("n_complete correctly counts the number of missings",{
expect_equal(n_complete(c(0,NA,120,NA)),2)
expect_equal(n_complete(c(NA,NA,NA,NA)),0)
expect_equal(n_complete(c(1,2,3,4,5)),5)
})
test_that("n_complete works for dataframes",{
expect_equal(n_complete(airquality), 874)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.