在ggplot中关闭一些传说

假设我有一个具有多个图例的ggplot。

mov <- subset(movies, length != "")
(p0 <- ggplot(mov, aes(year, rating, colour = length, shape = mpaa)) +
  geom_point()
)

我可以像这样关闭所有图例的显示:

(p1 <- p0 + theme(legend.position = "none"))

将show_guide = FALSE传递给geom_point(根据这个问题)将关闭形状图例。

(p2 <- ggplot(mov, aes(year, rating, colour = length, shape = mpaa)) +
  geom_point(show_guide = FALSE)
)

但是如果我想关闭颜色传说呢?似乎没有办法告诉show_guide将其行为应用到哪个图例。并且没有用于缩放或美学的show_guide参数。

(p3 <- ggplot(mov, aes(year, rating, colour = length, shape = mpaa)) +
  scale_colour_discrete(show_guide = FALSE) +
  geom_point()
)
# Error in discrete_scale

(p4 <- ggplot(mov, aes(year, rating, shape = mpaa)) +
  aes(colour = length, show_guide = FALSE) +
  geom_point()
)
#draws both legends

这个问题表明，现代的控制图例的方法(从ggplot2 v0.9.2开始)是使用guides函数。

我希望能够做一些

p0 + guides(
  colour = guide_legend(show = FALSE) 
)

但是guide_legend没有show参数。

如何指定显示哪些图例?

你可以在scale_…_…()中使用guide = "none"来抑制图例。

对于你的例子，你应该使用scale_colour_continuous()，因为长度是连续变量(不是离散的)。

(p3 <- ggplot(mov, aes(year, rating, colour = length, shape = mpaa)) +
   scale_colour_continuous(guide = "none") +
   geom_point()
)

或者使用function guides()，你应该为你不想显示为图例的元素/美学设置“none”，例如填充、形状、颜色。

p0 <- ggplot(mov, aes(year, rating, colour = length, shape = mpaa)) +
  geom_point()    
p0+guides(colour = "none")

更新

这两种解决方案都适用于新的ggplot2 3.3.5版本，但电影数据集不再出现在这个库中。相反，您必须使用新的包ggplot2movies来检查这些解决方案。

library(ggplot2movies)
data(movies)
mov <- subset(movies, length != "")

2013-01-30 12:55:00

您可以简单地添加show。legend=FALSE geom压制对应的传说

2018-09-04 07:23:59

在ggplot中关闭一些传说

推荐文章

最新文章

标签