假设我有一个具有多个图例的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 != "")
你可以在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 != "")
