context("StockEvent setters (class unions)")
testthat::test_that("setStockGraph", {
testthat::expect_error(setStockGraph(.Object = stockEvent()))
testthat::expect_error(setStockGraph(.Object = stockEvent(), stockGraph = stockGraph_obj))
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.