context("Programs")
tbl_new <- new_program_table()
tbl_get <- get_program_table()
test_that("Dummy table is created.", {
expect_true(is.data.frame(tbl_new), TRUE)
expect_true(is.data.frame(tbl_get), TRUE)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.