test_that("Donut plot", {
gg_donut(data = iris, dic = NULL, vars = c("species", "petal_width"))
gg_donut(data = iris, dic = NULL, vars = c("species"), agg = "count")
gg_donut_Cat(iris)
gg_donut_CatNum(iris)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.