library(ggplot2)
library(ggiraph)
p <- ggplot(iris, aes(x=Sepal.Length,
y=Sepal.Width,
fill = Species,
starshape = Species,
tooltip = Species)
) +
geom_star_interactive(size=3)
girafe(ggobj=p)
Run the code above in your browser using DataLab