【R：データ整形】複数のキーに基づいてデータフレーム内の条件に合う行に任意の処理を加えたい

Question

前提

以下のような2種類のデータフレームがあります。

fish1 <- c("イワシ", "サンマ", "アジ")
temp1 <- c(21, 20, 30)
id1 <- c("A", "B", "C")
df1 <- data.frame(魚 = fish1, 水温 = temp1, ID = id1)
> df1
      魚 水温 ID
1 イワシ   21  A
2 サンマ   20  B
3   アジ   30  C

fish2 <- c("イワシ", "サンマ", "アジ", "マグロ")
temp2 <- c(21, 22, 30, 31)
id2 <- c("A", "C", "C", "E")
df2 <- data.frame(魚 = fish2, 水温 = temp2, ID = id2)
> df2
      魚 水温 ID
1 イワシ   21  A
2 サンマ   22  C
3   アジ   30  C
4 マグロ   31  E

実現したいこと

df2の中で、df1と一致しているものがあれば”T"を、一致していなければ”F"を返し、4列目にその判定結果を加えたいです。イメージは以下の通り。

> df3
      魚 水温 ID 判定
1 イワシ   21  A    T
2 サンマ   22  C    F
3   アジ   30  C    T
4 マグロ   31  E    F

元のデータセットはかなり膨大で、判定に関係のない変数も含まれています。
とにかく、「魚」「水温」「ID」の3項目がdf1と一致する行をdf2内で探し、新たに列を加えたいです。よろしくお願いします。

Answer 1

df1において条件に合致しそうな行をsubsetで求め、その行数をチェックすればよさそうです。

df2$判定 <- sapply(1:nrow(df2), function(r){nrow(subset(df1, 魚==df2[r,"魚"] & 水温==df2[r,"水温"] & ID==df2[r,"ID"]))>0})

こういう雰囲気でどうでしょう。中身のチェックは大雑把にしかしていません。