ggpubr shared legend code example Example: ggarrange common legend ggarrange(bxp, dp, common.legend = TRUE)