关闭 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 = FALSEgeom_point

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

但是，如果我想关闭颜色图例怎么办？似乎没有办法告诉哪个图例应用它的行为。而且没有关于规模或美学的争论。show_guideshow_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

如何指定显示哪些图例？