我试图制作一个按性别划分的权重直方图。不幸的是,一些参与者并不知道性别,但我确实对他们有分量。这导致了使用的级别,但与我无关,不幸的是我似乎无法弄清楚如何制作它以便不显示NA直方图。
这是我的代码:
KYHH %>%
ggplot(aes(x = Weight)) +
geom_histogram() +
facet_grid(~ Gender, drop = TRUE) +
ggtitle("Weight by Gender")
你能帮忙吗?
提前致谢!
答案 0 :(得分:2)
library(dplyr)
KYHH %>% filter(!is.na(Gender)) %>%
ggplot(aes(x = Weight)) +
geom_histogram() +
facet_grid(~ Gender, drop = TRUE) +
ggtitle("Weight by Gender")
答案 1 :(得分:0)
另一种替代解决方案可以是drop=TRUE
。
# create a factor variable with several levels
occupation<- factor(c("astronaut","baker","cobbler","driver",
"engineer","fisherman","gambler"))
occupation
[1] astronaut baker cobbler driver engineer fisherman gambler
Levels: astronaut baker cobbler driver engineer fisherman gambler
# drop the last 3 levels
df<-occupation[1:4, drop=TRUE]
df
[1] astronaut baker cobbler driver
Levels: astronaut baker cobbler driver
# drop levels 1,4,7
df1<- occupation[c(2:3,5:6), drop=TRUE]
df1
[1] baker cobbler engineer fisherman
Levels: baker cobbler engineer fisherman