从箱线图图例 ggplot2 中删除变量

Question

我有一个盒须图，但我不知道如何从图例中删除某些变量。

这是我正在使用的代码

number_ticks <- function(n) {function(limits) pretty(limits, n)}
plot<-ggplot(data,aes(x=Group,y=Hue,fill=Group))+
  geom_boxplot()
plot + scale_y_continuous(breaks=number_ticks(10.5)) +scale_fill_manual(values = c("Control Day" = "red",
                                                                                 "Control Night" = "lightblue",
                                                                                 "Experimental Day" = "red",
                                                                                 "Experimental Night" = "lightblue"), labels=c("Day", "Night")) + coord_flip()

这是我得到的情节：

如何从图例中删除“NA”变量？

谢谢！

预计到达时间：

我只想要传说中的“白天”和“黑夜”！ NA 被故意标记为这样。

Answer 1

我认为您可以使用separate的tidyr包为 Day/Night 和 Experimental/Control 案例创建一个新列。

data %>%  separate(Group , sep =" " , remove = FALSE , c("Condition_1" , "Condition_2")) %>% 
ggplot(aes(x=Group,y=Hue,fill=Condition_2))+ 
geom_boxplot() + scale_y_continuous(breaks=number_ticks(10.5))+
scale_fill_manual(values = c("red", "lightblue"), labels=c("Day", "Night")) + coord_flip()

我separate创建了两个新列，用于实验/控制的 Condition_1 和用于白天/夜间的 Condition_2，并使用 Condition_2 填充框。