R函数替换有货变量中所有“ f”的实例？

Question

我做了什么： 我尝试对所有唯一值进行分类并用突变替换：

f <- c("Female/woman", "female", "Female cisgender", "Female", "Woman", "woman", "Women", "women", "f", "F" )
m <- c("male", "Cis Male", "Male", "m", "M", "ma,e=]]")
gq <- c("genderqueer", "nonbinary", "genderfluid")

df |> 
    mutate(GenderNew = case_when(
              GenderSex %in% f ~ "F",
           GenderSex %in% m ~ "M",
            GenderSex %in% gq ~ "Q",
)) -> df_new

但这在我的Gendernew专栏中给了我多个NA。我也没有成功。

我想做的是：替换字母“ F”的所有出现，无论字母/参与者在弦乐/参与者中的位置如何用字母“ F”。与指示男性或性别的反应相同。我希望我的结果要么是“ M”，“ F”，“ GQ”，要么是任何参与者作为响应的任何参与者，因此我可以重新编码它而不会缺少任何内容。

GenderSex <-
c("Male", "Female", "female", "Female/woman", "Female", "F", 
"female", "Woman", "Cis female, she her", "Female cisgender", 
"Female heterosexual", "I identify as a trans woman!", "Demiboy", 
"Transwoman", "My sex is female and my gender identity is nonbinary", 
"male", "m", "woman", "Woman", "Nonbinary", "my gender doesn't exist", 
"Male/AMAB")

使用辅助函数，一种矢量化形式的the，然后是每行逻辑值。

grepl

---