atacando <- subset(treta, denuncia=="candidatura atacando") atacada <- subset(treta, denuncia=="candidatura sendo atacada")
treta3 <- read.csv("tretas_ate_quinta_edi.csv", sep = "|", colClasses = "character")