Nothing
test_that("Testing is_key_column_present() in various settings", {
expect_error(is_key_column_present ( data.frame (agriculture = 0.0123,
manufacturing = 0.1436,
trade = 0.0921))
)
expect_error(is_key_column_present ( data.frame (indicator = "your_indicator",
agriculture = 0.0123,
manufacturing = 0.1436,
trade = 0.0921),
potential_keywords = c("her_indicator", "his_indicator"))
)
expect_true(is_key_column_present ( data.frame (indicator = "your_indicator",
agriculture = 0.0123,
manufacturing = 0.1436,
trade = 0.0921),
potential_keywords = c("her_indicator", "your_indicator"))
)
})
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.