context ("plotspc")
test_that("BARBITURATES", {
spc <- do.call (collapse, barbiturates [1:3])
plotspc (spc, col = matlab.dark.palette (3), stacked = TRUE, lines.args = list (type = "h"))
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.