カテゴリカルな値を代入する新たな列を作成したい

Question

前提・実現したいこと

値を基にカテゴリカルな値を代入する新たな列を作成したいです。
irisデータのSpecies列の値がsetosaまたはversicolorの場合はAが代入され、virginicaの場合はBが代入される新たな列(ソースコードでは列名groupとしています)を追加したいです。
どなたか教えていただけますとありがたいです。

発生している問題・エラーメッセージ

Error in Species == "setosa" | "versicolor" : 
  operations are possible only for numeric, logical or complex types

該当のソースコード

iris %>% mutate(group = case_when(
Species == "setosa"|"versicolor" ~ "A",
Species == "virginica" ~ "B",
T ~ NA_real_))

Answer 1

論理演算子|は文字列に対して適用できません。
case_when()は文字列ベクトルを返すように書かなければなりません。

iris %>%  mutate(group = case_when((Species == "setosa" | Species == "versicolor") ~ "A", Species == "virginica" ~ "B", T ~ "C")) -> iris2

iris2$group
  [1] "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A"
 [38] "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A"
 [75] "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "B" "B" "B" "B" "B" "B" "B" "B" "B" "B" "B"
[112] "B" "B" "B" "B" "B" "B" "B" "B" "B" "B" "B" "B" "B" "B" "B" "B" "B" "B" "B" "B" "B" "B" "B" "B" "B" "B" "B" "B" "B" "B" "B" "B" "B" "B" "B" "B" "B"
[149] "B" "B"

Comments

[malawi2007]

わかりやすい説明、ありがとうございました！助かりました！