test_that("plot the distribution", {
expect_snapshot(
test <- plot_distribution(
data = mtcars,
x = mpg,
group = ~cyl,
bins = 50)
)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.