Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/68.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R 如何将带有副标题的标题添加到注释_图中?_R_Ggplot2_Gridextra_Ggpubr - Fatal编程技术网

R 如何将带有副标题的标题添加到注释_图中?

R 如何将带有副标题的标题添加到注释_图中?,r,ggplot2,gridextra,ggpubr,R,Ggplot2,Gridextra,Ggpubr,我正在使用ggarrange和annotate_figure并排显示两个绘图。在我的实际代码中,我在每个子情节上有不同的标题,但是在整个情节的顶部需要一个共同的标题和副标题 我知道如何在顶部添加文本,但如何添加两行,每行使用不同的字体(例如,顶部标题应为大号/粗体,第二行/副标题应为较小的常规字体) 下面是我如何制作标题的。是否有办法将文本添加到顶部 library(tidyverse) library(ggpubr) df <- data.frame() plot1 <- ggp

我正在使用
ggarrange
annotate_figure
并排显示两个绘图。在我的实际代码中,我在每个子情节上有不同的标题,但是在整个情节的顶部需要一个共同的标题和副标题

我知道如何在顶部添加文本,但如何添加两行,每行使用不同的字体(例如,顶部标题应为大号/粗体,第二行/副标题应为较小的常规字体)

下面是我如何制作标题的。是否有办法将
文本添加到
顶部

library(tidyverse)
library(ggpubr)

df <- data.frame()
plot1 <- ggplot(df) + geom_point() + xlim(0, 10) + ylim(0, 100)
plot2 <- ggplot(df) + geom_point() + xlim(0, 10) + ylim(0, 100)

all.plots <- ggarrange(plot1, plot2)
annotate_figure(all.plots,
                top=text_grob("Antibiotic Effectiveness"))
库(tidyverse)
图书馆(ggpubr)

df可以使用plotmath为文本组创建表达式。看到了吗?数学

库(tidyverse)
图书馆(ggpubr)

df我通常使用cowplot来做这件事,我很难理解如何使用cowplot来做这件事。任何进一步的指导都将不胜感激。