Candidatos por Coligação em 2016

Você conhece todos os candidatos da coligação do seu candidato? Veja aqui quem pode acabar entrando (ou ficando de fora) por conta do sistema proporcional.

candidatos2016 <- read.csv("~/devel/eleicoes2016/raw/eleicao2016/consulta_cand_2016_SP.txt", sep=";", quote="\"", header = FALSE, fileEncoding="cp1252")

candidatos_sp <- candidatos2016 %>%
  filter(V10 == 'VEREADOR', V8 == 'SÃO PAULO')

edges_can <- candidatos_sp %>%
  select(V15,V19) %>%
  rename(source=V15,target=V19)

edges_col <- candidatos_sp %>%
  select(V19,V23) %>%
  rename(source=V19,target=V23)

edges <- full_join(edges_can,edges_col)
## Joining by: c("source", "target")
## Warning in outer_join_impl(x, y, by$x, by$y): joining factors with
## different levels, coercing to character vector

## Warning in outer_join_impl(x, y, by$x, by$y): joining factors with
## different levels, coercing to character vector
simpleNetwork(edges)