tests/testthat/test-geom_boxplot2d.R

test_that("mtcars_boxplot2d", {
	data(mtcars)
	p <- ggplot(mtcars, aes(x = wt, y = mpg, group = factor(cyl), color = factor(cyl), fill = factor(cyl))) +
		geom_boxplot2d() +
		theme(legend.position = 'bottom')
	vdiffr::expect_doppelganger("mtcars boxplot2d", p)
})
jbryer/ggBoxplot2d documentation built on April 10, 2022, 11:04 a.m.