Wrapper to plot euler/venn diagram in R
This package wraps up functions from the eulerr package.
Install with
devtools::install_github("gdmcdonald/plotVenn")
Example
cars <- mtcars %>%
transmute(`High Efficiency` = mpg>20,
`More Cylinders` = cyl>=6)
plotVenn(cars, title = "Overlap between more cylinders\n and high efficiency in mtcars")
The table that was input, cars
, looked like:
High Efficiency | More Cylinders | |
---|---|---|
Mazda RX4 | TRUE | TRUE |
Mazda RX4 Wag | TRUE | TRUE |
Datsun 710 | TRUE | FALSE |
Hornet 4 Drive | TRUE | TRUE |
Hornet Sportabout | FALSE | TRUE |
. | . | . |
. | . | . |
. | . | . |
Example with more colours:
flowers <- iris %>%
transmute(`Short Petals` = Petal.Length<2.5,
`Long Sepals` = Sepal.Length>6,
`Virginica` = Species=="virginica")
plotVenn(flowers,
title = "Subgroups of Iris dataset",
fills = c("lightgreen","lightgoldenrod","lightblue","lightpink"),
edges = c("darkolivegreen","orange","blue","red"))