ggpubr 相当于简版的ggplot，功能和细节相对少了很多，但代码也简洁了不少。

ggscatter(iris,x="Sepal.Length",
          y="Petal.Length",
          color="Species")

统计分析

可以在同一个函数内对参数进行赋值，实现各种复杂图形的绘制。

p <- ggboxplot(iris, x = "Species", 
               y = "Sepal.Length",
               color = "Species", 
               shape = "Species",
               add = "jitter")
my_comparisons <- list( c("setosa", "versicolor"), 
                        c("setosa", "virginica"), 
                        c("versicolor", "virginica") )
p + stat_compare_means(comparisons = my_comparisons)+ # Add pairwise comparisons p-value
  stat_compare_means(label.y = 9)