R/circ_electoral.R

In csmontt/plebiscito2020: Colección de funciones para scrapear http://www.servelelecciones.cl/

#' Función para obtener las circunscripciones electorales
#'
#' @param eleccion eleccion para la cual se desea obtener las circunscripciones
#' electorales
#' @export
#' @examples
#' circ_electoral('elecciones_constitucion')


circ_electoral <- function(eleccion = "elecciones_constitucion"){
        url = paste0("http://pv.servelelecciones.cl/data/",
                        eleccion, "/filters/",
                        "circ_electoral","/allchile.json")
        resultado = obtener_json(url)
        names(resultado) <- c("id_circ_electoral", "nombre_circ_electoral")
        return(resultado)
}