Talvez Benilton ou outro usuário de loops possam ajudar. Acho que a resposta é muito simples.
Desde já agradeço.
# Usando o arquivo abaixo com algumas células em branco (pois o valor não existe). Então o loop abaixo não funciona. Eu gostaria que o loop corresse pelo arquivo e, quando encontrasse um valor faltando, ele ignorasse e pulasse para o próximo valor, sem produzir um NA no meu output. Talvez usar if statement...
pop = read.csv("file.csv", row.names = 1)
counter = 1
while (counter < length(names(pop))) {
N = length(c(pop[ ,counter]))
Names = levels(factor(c(pop[ ,counter], pop[ ,counter + 1])))
ObsGen = matrix(0, nrow = length(Names), ncol = length(Names), dimnames = list(Names, Names))
for(i in 1:N) {
ObsGen[paste(pop[i, counter]), paste(pop[i, counter + 1])] = ObsGen[paste(pop[i, counter]), paste(pop[i, counter + 1])] + 1
}
print(ObsGen)
counter = counter + 2
}