我使用ggplot2和grid.arrange在rmarkdown文档中打印图形,以绘制垂直排列的折线图和条形图。图表很好,但在pdf文档中生成的这个无关的文本显示在图表下方:
TableGrob(3 x 1)“排列”:3个grobs z单元格名称grob 1 1(2-2,1-1) 安排gtable [布局] 2 2(3-3,1-1)安排gtable [布局] 3 3 (1-1,1-1)安排文本[GRID.text.6189]
使图形的代码在这样的函数中:
ggnorm <- ggplotGrob(raw.gr)
ggvol <- ggplotGrob(vol.gr)
maxWidth = grid::unit.pmax(ggnorm$widths[2:5], ggvol$widths[2:5])
ggnorm$widths[2:5] <- as.list(maxWidth)
ggvol$widths[2:5] <- as.list(maxWidth)
combo.plot <- grid.arrange(ggnorm, ggvol, ncol=1, top=the.title)
return(combo.plot)
块开头是这样的:
```{r overall, echo=FALSE, results="asis", warning=FALSE, message=FALSE}
然后调用该函数,结果打印如下:
overall.plot <- ComboPlot(overall.raw.scores, my.aes, paste("EPI", var.list[i], "through", yrq.list[length(yrq.list)]))
cat(" \n### \n")
print(overall.plot)
cat(" \n### \n")
我不知道如何摆脱它。任何人吗?
(已编辑添加代码)