根据if / else语句从r中的数据框中获取值并导入到另一个数据框

Question

我有一个数据框：

df1 <- data.frame(AD=c(0,1,0,1), FN=c(101,202,105,104), var1=c(15,25,15,25), var2 = c(50,20,10,20))

我试图根据if语句复制var1或var2。如果AD == 0，则取var1，如果AD == 1取var2。它将被复制到新列var并在FN上匹配？输出看起来像这个df2 <- data.frame(FN=c(101,202,105,104), var=c(15,20,15,20))。

Answer 1

df2 <- data.frame(FN = df1$FN, 
                  var = ifelse(df1$AD, df1$var2, df1$var1))