test_that("get_ipeds_unitid returns a character, regardless of initial data type",{
expect_type(get_ipeds_unitid(data.frame(UNITID = 123456)), 'character')
expect_type(get_ipeds_unitid(data.frame(UNITID = '123456')), 'character')
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.