R版本3.2.2下的arrangeGrob问题

时间:2015-10-02 21:08:36

标签: r ggplot2 gridextra grob

我更新了我的R版本,包括所有软件包,函数arrangeGrob(Package gridExtra)已更改。

在我的旧版本R版本3.1.3上,我使用它来制作角标签:

加载r包

library(ggplot2)
library(grid)
library(gridExtra)

示例数据

a <- 1:20
b <- sample(a, 20)
c <- sample(b, 20)
d <- sample(c, 20)

创建数据框

mydata   <- data.frame(a, b, c, d)

创建示例图

myplot1  <- ggplot(mydata, aes(x=a, y=b)) + geom_point()
myplot2  <- ggplot(mydata, aes(x=b, y=c)) + geom_point()
myplot3  <- ggplot(mydata, aes(x=c, y=d)) + geom_point()
myplot4  <- ggplot(mydata, aes(x=d, y=a)) + geom_point()

设置角标签

 myplot1 <- arrangeGrob(myplot1, main = textGrob("A", x = unit(0, "npc")
     , y   = unit(1, "npc"), just=c("left","top"),
     gp=gpar(col="black", fontsize=18, fontfamily="Times Roman")))

 myplot2 <- arrangeGrob(myplot2, main = textGrob("B", x = unit(0, "npc")
     , y = unit(1, "npc"), just=c("left","top"),
     gp=gpar(col="black", fontsize=18, fontfamily="Times Roman")))

 myplot3 <- arrangeGrob(myplot3, main = textGrob("C", x = unit(0, "npc")
    , y  = unit(1, "npc"), just=c("left","top"),
    gp=gpar(col="black", fontsize=18, fontfamily="Times Roman")))

 myplot4 <- arrangeGrob(myplot4, main = textGrob("D", x = unit(0, "npc")
    , y = unit(1, "npc"), just=c("left","top"),
    gp=gpar(col="black",    fontsize=18, fontfamily="Times Roman")))

 grid.arrange(myplot1, myplot2, myplot3, myplot4) 

我得到了以下情节,很好:

enter image description here

但在新的R版本3.2.2下,图像如下所示:

enter image description here

arrangeGrob为每个textGrob打开一个新图像,我在一个页面上有八个图像而不是四个。如何修复旧版本的R和gridExtra中的情节?

1 个答案:

答案 0 :(得分:1)

来自Kev的评论:

  

已经重写了gridExtra,它不是(完全)向后的   兼容 - 可能是问题。看看新的维基   cran.r-project.org/web/packages/gridExtra/vignettes / ...尝试改变   主要到顶部 - user20650