Given the data and chart below, how do I remove the category that is shown as "NA" from the legend? I just want the legend to show the colours for categories A
, B
, and 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")