ggplot(mtcars, aes(disp, mpg)) +
geom_point() +
facet_sector(
vars(cyl),
coord_circle(
start = -0.4 * pi, end = 0.4 * pi, inner.radius = 0.3,
outer.radius = 0.8, expand = TRUE
)
)
Run the code above in your browser using DataLab