修改现有ggplot对象中的比例,而无需替换比例

问题描述

我有一个ggplot对象。它具有由scales_x_continuous()创建的x轴标签。在不重新创建图的情况下,并且在不更改传递给scale_x_continuous()的任何其他参数的情况下,我想更改x轴标签。我该怎么办?

关于创建ggplot对象后有许多SO帖子。但据我所知,这些帖子中的解决方案不适用于这种特殊情况。为了解决问题,这是一个小例子:

library(ggplot2)
p <- ggplot(mtcars,aes(mpg,wt)) + 
  geom_point() + 
  scale_x_continuous(name = "oldLabel",limits = c(15,30))

我想将x轴标签从“ oldLabel”更改为“ newLabel”,而不覆盖limits参数。在其他情况下,其他帖子中提到的许多看似显而易见的策略在这种情况下不起作用:

  1. p + scale_x_continuous(name = "newLabel")会更改标签-但也会更改限制。我可以通过致电p + scale_x_continuous(name = "newLabel,30)")解决这个问题。但是在实践中,我使用的ggplot对象可能带有scale_x_continuous()的许多参数,因此,我不想重复它们,只是为了覆盖x轴标签。

  2. p + xlab("newLabel")不会替换标签。也就是说,xlab()在这种情况下似乎无效。如果原始标签是用xlab()指定的,则可以使用,但是这里不是这种情况。

  3. update_labels(p,list(x = "new x label"))也不替换标签。

  4. ggplot_build()似乎也没有任何作用,至少在我一直在使用它:

library(gridExtra)
tmp <- ggplot_build(p)
tmp$layout$panel_params[[1]]$x$name     <- "newLabel"
tmp$layout$panel_params[[1]]$x.sec$name <- "newLabel"
grid.arrange(ggplot_gtable(tmp))

解决方法

暂无找到可以解决该程序问题的有效方法,小编努力寻找整理中!

如果你已经找到好的解决方法,欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@)