r - 将两个二进制列合并为一个保留二进制选项

Question

将此数据框作为输入插入：

data.frame(stocknum = c(1,2,3), text = c(1,0,1), final = c(0,0,1))

如何将两列 text 和 final 合并为一个保留二进制选项，示例输出

data.frame(stocknum = c(1,2,3), text = c(1,0,1), final = c(0,0,1), merged_text_final = c(1,0,1))

标签： r

Answer 1

我们可以pmax使用base R

df1$merged_text_final <- with(df1, pmax(text, final))

---

或者另一种选择|是Reduce

df1$merged_text_final <- +(Reduce(`|`, df1[c("text", "final")]))

数据

df1 <- data.frame(stocknum = c(1,2,3), text = c(1,0,1), final = c(0,0,1))