context( "clean.vector" )
test_that( "works as expected", {
expect_equal(
clean.vector( c( 'NA', 'Not NA'), verbose = FALSE ),
c( NA, 'Not NA' )
)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.