在 R 中使用 tidyverse 添加新列？

Question

我有兩個數據集 data1 和 data2，如下表所示

    > data1 

        x      y z
        apple  3 3
        banana 4 3
        mango  1 1
        pear   2 1
        lemon  3 1

 > data2=
    X  
    mango 
    pear 
    lemon 

我想要實現的是在下面的類似示例中，即當 data2 存在時 data1 應該創建一個類型為好的列，而其他列應該命名為壞。 我在下面創建了一個示例格式。 我正在嘗試在 R 中執行此操作，最好在 tidyverse 庫或任何其他庫中執行此操作。 任何有關如何解決此問題的建議將不勝感激。

x      y z  type
apple  3 3  bad
banana 4 3  bad
mango  1 1  good
pear   2 1  good
lemon  3 1  good

Answer 1

關鍵是%in%運算符，無論您是在 tidyverse 還是 base R 中執行此操作。

data1 %>% mutate(type = (x %in% data2$X))

Answer 2

帶有base R的選項

transform(data1, type = x %in% data2$X)