「抽出条件の値」を複数もったデータフィルタリングがしたい

Question

前提・実現したいこと

Rで、データフレームから行の抽出をしたいです。
抽出条件の値を、c("AAA","BBB")など、複数で実現したいです。

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

フィルター処理の部分で以下のエラーが表示されてしまいます。
エラーの内容は理解しており、そこで困っているわけではありません。

どちらかと言えば、実現するための代替え案みたいなものがあれば共有いただけると嬉しいです。

Warning messages:
1: In `!=.default`(all_data$Data_1, c("AAA", "BBB")) :
  longer object length is not a multiple of shorter object length
2: In is.na(e1) | is.na(e2) :
  longer object length is not a multiple of shorter object length

該当のソースコード

data_1 = c("AAA","BBB","CCC")
data_2 = c("111","222","333")
data_3 = c("2021-05-11","2021-05-12","2021-05-13")

all_data = data.frame(Data_1 = data_1, 
                      Data_2 = data_2,
                      Data_3 = data_3)

# これは成功する
result <- all_data[all_data$Data_1 != "AAA", , drop=F]

# これは失敗する
result <- all_data[all_data$Data_1 != c("AAA","BBB"), , drop=F]

試したこと

フィルタリングの方法をネットで調査いたしました。
ベクトルの概念など、R特有の知識がなくついていけませんでした。

質問サイトを参考に見よう見まねで動かしました。

Answer 1

result <- all_data[all_data$Data_1 != c("AAA","BBB"), , drop=F]

このコードの意図が「AAAでもBBBでもない行を抽出したい」であれば、

result <- all_data[!all_data$Data_1 %in% c("AAA","BBB"),,drop=F]

そういう意図でないのなら、何をやりたいのかを日本語で補足してください。

Comments

[haihaikazuma]

回答いただきありがとうございました。
コードの意図はご認識の通りです。

不思議な記述方法ですね…一旦コピペで動くことを確認致しました。
これを参考に学習させていただきます。

[KojiDoi]

コマンドラインから、
> all_data$Data_1
> all_data$Data_1 %in% c("AAA","BBB")
などと入力して、まずはこれらの出力結果を眺めてみると、Rにおけるベクトルの使い方が見えてくるのではないでしょうか。