关于ifelse（）应用于factor的小问题

本人是R的初学者，问题如果很幼稚大家不要笑我...我想用ifelse（）清理数据，将空白或有问题的数据改为NA。但是结果总是将很多原本没有问题的数据也改成NA。
下面是我的code：

diamonds = diamonds %>% mutate (cut = ifelse(diamonds$cut!=c("Fair","Good","Very Good","Premium","Ideal"),NA,as.character(diamonds$cut)))
ggplot(data=diamonds, aes(cut)) + geom_bar()

结果出来的图是这样的：

数据里的cut一项也变成了：


希望大家可以帮我看看问题出在哪里 谢谢！！

爱学习的芒果 发表于 2017-9-11 09:29
我是用的“!=”，不知道对应的%in%应该是什么呢

ifelse(!diamonds$cut %in% c("Fair","Good","Very Good","Premium","Ideal"), ........

用%in%，不用==

cheetahfly 发表于 2017-9-11 09:10
用%in%，不用==

我是用的“!=”，不知道对应的%in%应该是什么呢

cheetahfly 发表于 2017-9-11 07:45
ifelse(!diamonds$cut %in% c("Fair","Good","Very Good","Premium","Ideal"), ........

非常感谢！！