Из того, что я могу догадаться о вашем наборе данных. Пожалуйста, предоставьте свои данные, используя dput
.
Используя векторизацию:
COMP30$Test_3<-"blank"
matches <- cbind(COMP30$PMPI_Has_Plan, COMP30$PMPI_Is_Eligible, COMP30$Test_3)
matches[!matches[,1] & !matches[,2],3] <- "Some text"
Или с for
l oop:
matches <- cbind(COMP30$PMPI_Has_Plan, COMP30$PMPI_Is_Eligible, COMP30$Test_3)
for (k in 1:nrow(matches)){
if (!matches[k, 1] & !matches[k, 2]){
matches[k, 3] <- "some text"
}
}