垂直排列不同种类的相邻杂物

时间:2018-07-18 10:01:58

标签: graphic grob

我创建了一个相关图,并且由于某种技术原因,我需要将其作为grob导出到pdf文件(不可使用胶乳)。我已经从相关图创建了一个表grob:

gcorrmat=tableGrob(corrmat,theme=t1)

我还为标题创建了一个textGrob:

    header=grobTree(rectGrob(gp=gpar(fill=NA,col=NA))
,textGrob("Measures Correlations and Reliability*"
, gp=gpar(fontfamily="Times"
,face="bold.italic",size=36)))

我以相同的方式创建了一个底部备注

footer=grobTree(rectGrob(gp=gpar(fill=NA,col=NA))
,textGrob("* The asterisk suggests that the number is a cronbach's alpha rather than an autocorrelation"
, gp=gpar(fontfamily="Times", size=12)))

我需要做的事情看起来很简单,但远没有像我这样的傻瓜新手那样显而易见:

我想在A4 pdf页面上将这些树状对象垂直排列,即:标题,Corrlogram,底部备注

grid.arrange的top和bottom参数不会解决问题,因为pdf设备将标题grob放在A4页面的顶部,将5X5相关图放在其中间,并将底部的注释放在底部

我尝试创建3个grob的向量

然后网格排列:

groblist=c(header,gcorrmat,footer)
grid.arrange(grobs=groblist[1:3],ncol=1)

我得到了以下错误消息:

Error in gList(name = list("GRID.gTree.152", wrapvp = list(x = 0.5, y = 0.5,  : 
  only 'grobs' allowed in "gList"
In addition: Warning message:
In grob$wrapvp <- vp : Coercing LHS to a list

看起来矢量中的杂项种类不同,或没有被标识为杂项。尝试强制使用as.grob()或as.vector()并不能解决此问题。

我在尝试不可能的事情/错过明显的事情吗?

任何概念或称谓都会被接受。

0 个答案:

没有答案