ggboxplot：如何调整字体、边框变粗、箱子颜色

这是我编的，能够制作出来如下的分组图，想请教一下，是否有办法将：分组箱式图的字体变大，边框变粗，以及能够自主调整箱子的颜色 ？

  • data = read.table("ND12.txt",header = T,sep="\t")
  • head(data,10)
  • p <- ggboxplot(data, x = "PlantingPattern", y = "ProteinContent",
             color = "PlantingPattern", palette = "jco",
         add = "jitter",
         facet.by = "Year", short.panel.labs = FALSE)
  • p + stat_compare_means(aes(label = ifelse(p < 1.e-2,
    sprintf("p = %2.1e", as.numeric(..p.format..)),
    sprintf("p = %5.4f", as.numeric(..p.format..)))))

    img