画图时加大标题
##图形文本可分为三类,分别是标题,可以通过title()函数添加;
##图形内部文本,通过text()函数实现;
##图形周边文本,可以通过mtext()函数实现。
#R语言加大标题,普通作图时
mtext("dot and line",side = 4,outer = F,col = "purple")
#遇到无法用mtext和legend时,例如用plot_grid进行作图添加标题
title <- ggdraw() +
draw_label(figure.title, fontface='bold',size = 20)
pic <- plot_grid(pic1,venn.plot,ncol = 2)
plot_grid(title,pic,nrow = 2,
rel_heights = c(0.5, 2))