testsetup()
test_that("class wbChartSheet works", {
wb <- wb_workbook()$add_chartsheet()
expect_error(wb$add_data(x = mtcars), "Cannot write to chart sheet.")
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.