Creates legend object for base R plots
pie_legend(
aes,
colors = c("#e43157", "#377eb8", "#4daf4a", "#984ea3", "#ff7f00", "#ffff33", "#a65628",
"#f781bf", "#21d4de", "#91d95b", "#b8805f", "#cbbeeb")
)
chosen adverse events to display (character)
Colors for slices (this should be maximally 8) (character)