Попытка вставить новый столбец, который является комбинацией двух разных столбцов, то есть расы и этнической принадлежности

Question

Для демографического анализа состояния я хочу сравнить расу и этническую принадлежность и узнать, сколько людей испаноязычное, неиспаноязычное и др.

hsg.ppl2$XYZ <- for(i in 1:100)
if (hsg.ppl2$HISP[i] == 1 & hsg.ppl2$RAC1P[i] == 1) { "NHWht" } else if (hsg.ppl2$HISP[i] == 1 & hsg.ppl2$RAC1P[i] == 2) { "NHBlack" } else 
if (hsg.ppl2$HISP[i] == 1 & (hsg.ppl2$RAC1P[i] == 6 | hsg.ppl2$RAC1P[i] == 7)) {"NHAsian" } else
if (hsg.ppl2$HISP[i] == 1 & (hsg.ppl2$RAC1P[i] == 3 | hsg.ppl2$RAC1P[i] == 4 |hsg.ppl2$RAC1P[i] == 5 | hsg.ppl2$RAC1P[i] == 8 | hsg.ppl2$RAC1P[i] == 9)) {"NHOther" } else
if (hsg.ppl2$HISP[i] >= 1) {"HISP"} 
else {NA}

Я получаю фактический столбец XYZ как ноль

Answer 1

XYZ <- NULL
for(i in 1:100) {
if (hsg.ppl2$HISP[i] == 1 & hsg.ppl2$RAC1P[i] == 1) { XYZ[i] <- "NHWht" } else if (hsg.ppl2$HISP[i] == 1 & hsg.ppl2$RAC1P[i] == 2) { XYZ[i] <- "NHBlack" } else 
if (hsg.ppl2$HISP[i] == 1 & (hsg.ppl2$RAC1P[i] == 6 | hsg.ppl2$RAC1P[i] == 7)) {XYZ[i] <- "NHAsian" } else
if (hsg.ppl2$HISP[i] == 1 & (hsg.ppl2$RAC1P[i] == 3 | hsg.ppl2$RAC1P[i] == 4 |hsg.ppl2$RAC1P[i] == 5 | hsg.ppl2$RAC1P[i] == 8 | hsg.ppl2$RAC1P[i] == 9)) {XYZ[i] <- "NHOther" } else
if (hsg.ppl2$HISP[i] >= 1) {XYZ[i] <- "HISP"} 
else {XYZ[i] <- NA}
}
hsg.ppl2$XYZ <- XYZ