ggplot2 vs cowplot，FUN 错误（"text"[[1L]]，...）：

Question

我正在尝试使用 cowplot 来组合一些 ggplot2 图。它应该很简单，但我的 R 或 Rstudio 中的某些东西坏了。我不知道什么。我可以让它与 grid.arrange 一起工作，但是我的 rmarkdown 文件中的输出结果不太好。我将我的代码分解到最小数量以重新创建错误，并且超出了 rmarkdown

library(ggplot2)
library(Hmisc)
library(cowplot)


x <- c(1, 8, 9)
y <- c(1, 5, 9)
supply1 <- data.frame(bezier(x, y, evaluation = 500))

g1 <- ggplot(x = 0:10, y = 0:10, geom = "blank") +
  geom_path(data = supply1, aes(x = x, y = y), size = 1, colour = "BLUE")

g2 <- ggplot(x = 0:10, y = 0:10, geom = "blank") +
  geom_path(data = supply1, aes(x = x+1.5, y = y+1.5), size = 1, colour = "RED")


plot_grid(g1, g2,
          ncol = 2, 
          nrow = 1)

我收到这个错误：

Error in FUN("text"[[1L]], ...) :

Theme element 'text' has NULL property: margin, debug

我必须分离 cowplot，但可以使用此代码获得与 gridExtra 接近的东西：

library(ggplot2)
library(Hmisc)
library(gridExtra)


x <- c(1, 8, 9)
y <- c(1, 5, 9)
supply1 <- data.frame(bezier(x, y, evaluation = 500))

g1 <- ggplot(x = 0:10, y = 0:10, geom = "blank") +
  geom_path(data = supply1, aes(x = x, y = y), size = 1, colour = "BLUE")

g2 <- ggplot(x = 0:10, y = 0:10, geom = "blank") +
  geom_path(data = supply1, aes(x = x+1.5, y = y+1.5), size = 1, colour = "RED")

grid.arrange(g1,g2,
             ncol = 2,
             nrow = 1)

此代码输出： grid.arrange plot

事实证明，如果我尝试在加载了 ggplot2 和 cowplot 库的情况下制作任何 ggplot，我会收到“FUN 消息中的错误”。 R 3.1.3，RStudio 0.99.903，cowplot 0.4.0，ggplot2 2.1.0

我至少重装了两次，在另一台电脑上出现了同样的错误。我可以让它以有限的方式工作。如果我在除 plot_grid() 块之外的所有其他代码都是运行之后等待调用 cowplot 库，那么它将编织并给我 cowplot 输出。我不能仅在 Rmarkdown 的 R 脚本中重新创建它，但我必须将它作为降价的最后一块，之后的任何 ggplot 尝试都会导致编织失败。

短期内我使用了 grid.arrange() 并接受了结果，长期内我希望将 cowplot 作为一个选项。

有什么想法或建议吗？

Answer 1

显然这是一个自 R 3.3.1 以来已修复的错误，因此升级到此版本或更新版本应该会消失。

ggplot2 vs cowplot，FUN 错误（"text"[[1L]]，...）：

ggplot2 vs cowplot, Error in FUN("text"[[1L]], ...) :

r

ggplot2

rstudio

cowplot