test_that("viz_ts returns ggplot-object", {
# expect_identical(class(viz_ts(prepare_data(patientdata), left_right = "left"))[2],
# "ggplot")
# expect_identical(class(viz_ts(prepare_data(patientdata), left_right = "right"))[2],
# "ggplot")
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.