ggplot“重命名错误”

Question

更新我已经在下面发布了我的解决方案，罪魁祸首是我自己的 rename 函数覆盖了 reshape::rename

---

直到今天，我一直在使用 ggplot R 包，没有遇到什么麻烦。今天，我使用以前工作的代码时遇到错误，当我将它调试到最小的工作示例时，它仍然会出错；

如果我这样做：

library(ggplot2)
d<- data.frame(x=1:3,y=1:3)
ggplot(data=d) + geom_line(aes(x,y))   

返回如下错误：

Error in rename(x, .base_to_ggplot) : 
  unused argument(s) (.base_to_ggplot)

回溯是：

6: rename(x, .base_to_ggplot)
5: rename_aes(aes)
4: aes()
3: structure(list(data = data, layers = list(), scales = Scales$new(), 
       mapping = mapping, options = list(), coordinates = CoordCartesian$new(), 
       facet = FacetGrid$new(), plot_env = environment), class = "ggplot")
2: ggplot.data.frame(data = d, aes = c(x, y))
1: ggplot(data = d, aes = c(x, y))

使用rm(list=ls()) 删除所有对象后，该错误不会发生，但我仍然不清楚是什么对象导致了此错误或原因 - 我该如何解决这个问题？

有谁知道哪里出了问题？

Answer 1

我无法返回您在上面发布的相同错误消息。运行您的代码 sn-p 时，我收到以下错误：

Error: geom_pointrange requires the following missing aesthetics: ymin, ymax

因此，geom_pointrange() 期待 ymin 和 ymax 的参数。我将由您来填写您的相关信息，以了解这些参数应该包含哪些内容，但此代码会执行：

ggplot(data=d) + geom_pointrange(aes(x,y, ymin = y - .5, ymax = y + .5))

Answer 2

问题是由于 ggplot2 不使用命名空间引起的 - 这将在下一个版本中修复。

Answer 3

错误是由其中一个对象引起的（感谢来自@Chase 的指针）。

这是我如何调试并找到罪魁祸首的。重要的部分是使用try() 函数，即使出现错误也能保持 for 循环运行

foo <- ls() #get a static list of all suspect objects
for(i in 1:length(foo)) {
    print(foo[i])
    rm(list=foo[i])
    try(ggplot()+geom_point(aes(x=1:2,y=1:2)))
}

这导致以下输出：

...
[1] "45 reg.model"
Error in rename(x, .base_to_ggplot) : 
  unused argument(s) (.base_to_ggplot)
[1] "46 reg.parms"
Error in rename(x, .base_to_ggplot) : 
  unused argument(s) (.base_to_ggplot)
[1] "47 rename"
[1] "48 samples"
...

啊哈！是我自己的函数rename 导致了错误，因为ggplot2 依赖于reshape::rename。

解决方案：重命名新的rename 函数...以后如何防止这种情况发生？也许研究一下命名空间的使用。