Estou tentando pegar alguns resultados das eleições no site da politco usando o rvest.

http://www.politico.com/2016-election/results/map/president/wisconsin/

Como não consegui extrair todos os dados da página de uma só vez, fui para uma abordagem em nível de município. Cada município tem um seletor de CSS único (por exemplo, o de Adams County é: '#countyAdams .results-table'). Então, peguei todos os nomes de condados de outros lugares e montei um loop rápido (sim, eu sei que os loops são uma prática ruim em R, mas previ que esse método me levasse cerca de 3 minutos).

Pegue o URL

wiscoSixteen <- read_html("http://www.politico.com/2016-election/results/map/president/wisconsin")

Crie um data.frame vazio (e não, eu não pré-defini as colunas)

stateDf <- NULL

Obtenha a lista de condados (isso não está completo, mas para chegar ao ponto em que a rotina é interrompida, não precisamos de todos os 70 condados)

wiscoCounties <- c("Adams", "Ashland", "Barron", "Bayfield", "Brown", "Buffalo", "Burnett", "Calumet", "Chippewa", "Clark", "Columbia", "Crawford", "Dane", "Dodge", "Door", "Douglas", "Dunn", "Eau Claire", "Florence", "Fond du Lac", "Forest", "Grant", "Green", "Green Lake", "Iowa", "Iron", "Jackson", "Jefferson", "Juneau")

Meu loop 'for':

for (i in 1:length(wiscoCounties)){

    #Pull out the i'th county name and paste it in a string
    wiscoResult <- wiscoSixteen %>% html_node(paste("#county"," .results-table", sep=wiscoCounties[i])) %>% html_table()

    #add a column for the county name so I can ID later
    wiscoResult[,4] <- wiscoCounties[i]

    #then rbind 
    stateDf <- rbind(stateDf, wiscoResult)
}

Quando passa pelo 10º condado, para e retorna 'Erro: sem correspondências'.

Não é possível encontrar nada único sobre 'Columbia', o 11º condado. Perdido pelo que está acontecendo. Tenho certeza de que é algo estúpido, como geralmente é o caso. Qualquer ajuda é apreciada.