绘制两个图形时出错:无法将类列表的对象转换为grob

绘制两个图形时出错:无法将类列表的对象转换为grob,r,plot,cowplot,R,Plot,Cowplot,我试图将两个箱线图(box1、box2)放在一起,并在左上角标记为“A”和“B”。我正在尝试为此使用cowplot-包 这就是功能: plot_grid(box1, box2, labels = c('A', 'B'), label_size = 12) 然后我得到警告信息: 在默认情况下(绘图): 无法将类列表的对象转换为grob* 我得到的唯一打印输出是A和B字母。 我还尝试使用: boxC <- c(box1, bow2) plot_grid(plotlist = boxC, l

我试图将两个箱线图(box1、box2)放在一起,并在左上角标记为“A”和“B”。我正在尝试为此使用
cowplot
-包

这就是功能:

plot_grid(box1, box2, labels = c('A', 'B'), label_size = 12)

然后我得到警告信息:

在默认情况下(绘图): 无法将类列表的对象转换为grob*

我得到的唯一打印输出是A和B字母。 我还尝试使用:

boxC <- c(box1, bow2)
plot_grid(plotlist = boxC, labels = c('A', 'B'), label_size = 12, nrow=2)

这是因为它需要一个列表,但您提供的是一个向量!
为了克服这个问题,您可以简单地使用
boxC,多亏了mhh的回答,我编写了这个代码,它很有效!:)


BOX1\u数据您的主要问题是打印列表不是列表!尝试使用
boxC我试着这样写:>boxC plot\u grid(plotlist=boxC,labels=c('A','B'),label\u size=12,nrow=2),但出现了同样的错误。尝试不包括
label\u size=12
我试着像这样应用代码mhh:dfbox1 dfbox2 box1df box2df box\u list ggarrange(plotlist=box\u list,labels=c('A','B'),nrow=2)但是我得到了这个错误:error:美学必须是有效的数据列。有问题的美学:y=var。您是否键入了数据列的名称错误或忘记在_stat()之后添加?这是因为我没有指定“var=”?我对这个问题很陌生,所以我应该用什么来代替你随机的10个数字呢?你能在你的原始问题@Alvida中包含你的情节代码吗?如果我(或你)的答案对这个问题有合适的答案,请将其标记为已接受的答案,以便其他人更容易找到答案。在这种情况下,我可能有偏见的观点倾向于我的答案,因为它提供了示例数据和可视化输出。:)绝对地这是我在论坛上的第一个问题,所以我还不太熟悉。谢谢你的帮助!
BOX1_data <- read.table(file = "clipboard", 
                  sep = "\t", header=TRUE)
BOX1_data$Histology <- as.factor(BOX1_data$Histology)
BOX1plot <- ggplot(BOX1_data, aes(x=Histology, y=No.Variants)) + geom_boxplot()
BOX1plot

BOX2_data <- read.table(file = "clipboard", 
                  sep = "\t", header=TRUE)
BOX2_data$Stage <- as.factor(BOX2_data$Stage)
BOX2plot <- ggplot(BOX2_data, aes(x=Stage, y=No.Variants)) + geom_boxplot()
BOX2plot

BOX_list <- list(BOX1plot, BOX2plot)
> ggarrange(plotlist = BOX_list, labels = c('A', 'B'), ncol = 2)
BOX1_data <- read.table(file = "clipboard", 
                  sep = "\t", header=TRUE)
BOX1_data$Histology <- as.factor(BOX1_data$Histology)
BOX1plot <- ggplot(BOX1_data, aes(x=Histology, y=No.Variants)) + geom_boxplot()
BOX1plot

BOX2_data <- read.table(file = "clipboard", 
                  sep = "\t", header=TRUE)
BOX2_data$Stage <- as.factor(BOX2_data$Stage)
BOX2plot <- ggplot(BOX2_data, aes(x=Stage, y=No.Variants)) + geom_boxplot()
BOX2plot

BOX_list <- list(BOX1plot, BOX2plot)
> ggarrange(plotlist = BOX_list, labels = c('A', 'B'), ncol = 2)