r - 如何在另一列包含指定字符串的情况下设置NA？

Question

我有一个包含以下信息的数据框:

test_01 <- data.frame(Party_1 = c("ABC", "ABC", "ABC"),
                      Party_2 = c("DEF", "DEF", "GHI"),
                      Party_3 = c("GHI", "Independent", "Independent"),
                      Ministry_No_P1 = c(12,10,10),
                      Ministry_No_P2 = c(6,5,2),
                      Ministry_No_P3 = c(2,1,1)
                      )
test_01

我现在正在寻找一种方法来设置各个部门的数量( Ministry_No_Px ) Party_x在 NA 上，无论何时在 Party_x列中找到名为“独立”的字符串。
我想链接 Ministry_No_Px的设置在 Party_x 中找到“独立”字符串的条件下为 NA .

Answer 1

假设列是对应的顺序，创建一个包含字符串列的逻辑矩阵，即列索引从 1 到 3，并使用它来将数字列 4 到 6 中的相应值分配为 NA

test_01[4:6][test_01[1:3] == 'Independent'] <- NA

-输出

test_01
#  Party_1 Party_2     Party_3 Ministry_No_P1 Ministry_No_P2 Ministry_No_P3
#1     ABC     DEF         GHI             12              6              2
#2     ABC     DEF Independent             10              5             NA
#3     ABC     GHI Independent             10              2             NA