###Limpie el environment para comenzar a trabajar. (1 punto)

rm(list = ls())

###Cargue los paquetes necesarios para trabajar con DT. (1 punto)

library(data.table)

###Abra la base de datos Resultados Electorales

###Pista: Para los archivos .RDS utilice la función readRDS. Ojo que la base de datos no se abrirá como un DT, por lo tanto tiene que transformarla.

resultados<-readRDS("ResultadosElectorales (1).rds")
resultados<-as.data.table(resultados)

###Elimine los individuos cuyo nombre del Candidato sea “VOTOS NULOS”, “TOTAL” o “VOTOS EN BLANCO”

resultados <- resultados[!(resultados$Candidato == "TOTAL"),]
resultados <- resultados[!(resultados$Candidato == "VOTOS NULOS"),]
resultados <- resultados[!(resultados$Candidato == "VOTOS EN BLANCO"),]

###¿Cuántos pactos hubo en total según los datos?

resultados[,.N,by="Pacto"]

###¿Cuántas comunas en total hay en la base de datos? ¿Cuál fue la comuna con más observaciones?

resultados[,.N,by="Comuna"]

###Hay 52 comunas y la con mayor observaciones el Maipu

###Genere una objeto que contenga los nombres de los candidatos. Asegurese de que la base de datos no repetirá el nombre de los candidatos.

candidatos<-resultados[,.N, by="Candidato"]

###¿Cuántas personas votaron en total? ¿Cuáles fueron las 2 coaliciones con más votos? ¿Cuántos votos obtuvieron?

sum(candidatos$N)
## [1] 75164
resultados[,.N,by="Pacto"]

###Chile Vamos y Nueva Mayoria con 16740 y16267 votos

###¿Cuál fue el candidato “independiente” que obtuvo más votos?

Tabla1<-resultados[,.N,by=.(Candidato,Partido)]

###Obtubieron más votos los candidatos Vittori,SANDRA URIBE,CATHERINE BARRIGA,CLAUDIA NATHALIE con la misma cantidad de 1085

###¿Cuántas personas votaron en la comuna “LAS CONDES”?

resultados[,.N,by="Comuna"]

En las condes votaron 2948 personas

###Genere un objeto que contenga, para cada comuna, el número total de votos que se realizaron en la comuna. Llame a este objeto “DATOS_COMUNALES”

DATOS_COMUNALES<-resultados[,.N,by="Comuna"]

###Genere una base que contenga el nombre del candidato y el número total de votos a nivel de comuna que recibieron. Llame a este objeto “DATOS_CANDIDATOS”.