library(ggplot2)
set.seed(123)
ggplot(iris) +
ggstar::geom_star(aes(x=Species,y=Sepal.Length,fill=Species),
color = NA,
position = position_jitter(width = 0.25),
starshape = "hexagon", size = 0) +
geom_point(aes(x=Species,y=Sepal.Length,color=Species),
position = position_jitter(width = 0.25)) +
guides(fill = guide_legend(override.aes = aes(size = 5)))
This is slightly hacky but does what you want!