tests/testthat/test-gg-pie.R

test_that("Pie plot", {
  gg_pie(data = iris, dic = NULL, vars = c("species", "petal_width"))

  data <- lubridate::lakers
  gg_pie(data = data, dic = NULL, vars = c("team"), agg = "count")
  gg_pie_Cat(iris)
  gg_pie_CatNum(iris)
})
datasketch/ggmagic documentation built on Oct. 23, 2023, 3:39 a.m.