xiangpin/ggstar

Shape request

Opened this issue · 1 comments

brunomioto commented

Is it possible to add this shape to the package?
(It's used in this case: https://twitter.com/SethWalder/status/1711106718531289105?t=3G6WGkVSxAYNGTTJqpR0ZA&s=19)
image
It's just a circle with a rectangle in the upper section.

image

xiangpin commented

The github version supports it

library(ggstar)
library(ggplot2)

dat <- data.frame(x=c(1,1),y=c(1,1), type=c('groupB', 'groupA'))
ggplot(data = dat, mapping = aes(x, y, angle = type, fill = type)) +
    geom_star(
      starshape = 32,
      size = 108,
      alpha = .4
    ) +
    scale_angle_manual(values=c(0, 180)) +
    scale_fill_manual(values = c('orange', 'deepskyblue'),
                      guide = guide_legend(override.aes=list(size=3))
    )

image