从图例中删除特定标签

Question

鉴于下面的数据和图表，如何从图例中删除显示为“NA”的类别？我只是想传说，以显示颜色类别A，B和C。

library(tibble)
library(ggplot2)

mydata <- tibble(Time_dim = rep(1:10, 10),
                 Category = c(rep(NA, 10), rep(c(rep("A", 10), rep("B", 10), rep("C", 10)), 3)),
                 Attribute = c(rep("alpha", 10), rep("beta", 30), rep("omega", 30), rep("theta", 30)),
                 Data = runif(100))
mydata$Category <- factor(mydata$Category)
mydata$Attribute <- factor(mydata$Attribute)

ggplot(mydata, aes(x = Time_dim, y = Data, colour = Category)) +
geom_line() + facet_wrap(~ Attribute, ncol = 1, scales = "free")

Answer 1

你可以设置breaks你的color规模为仅要显示的类别。

在您的情况下，您可以使用levels您的颜色因子。

scale_color_discrete(breaks = levels(mydata$Category))