The Junar API is the basis for a number of Open Data initiatives in
Latin America and the USA. The junr
package is a wrapper to make it
easier to access data made public through the Junar API. Some examples
of implementations are: the City of
Pasadena, and the City of San
Jose. Others are listed on the Junar
website.
install.packages("devtools")
devtools::install_github("FvD/junr")
For a full example, please consult the package vignette.
Load the package and set URL and API-Key
library(junr)
base_url <- "http://api.datosabiertos.presidencia.go.cr/api/v2/datastreams/"
api_key <- "the-API-Key-from-the-corresponding-url"
With this connection information the junr
package helps you to do the
following:
Get the index of data behind the base URL
get_index(base_url, api_key)
You can also just get a list of GUID’s list_guid(base_url, api_key)
or
a list of data set titles list_titles(base_url, api_key)
.
Get a particular data set
data_guid <- "COMPR-PUBLI-DEL-MINIS"
purchasing_data <- get_data(base_url, api_key, data_guid)
Determine data dimensions
get_dimensions(base_url, api_key)
Clean up currency data
currency_data <- get_data(base_url, api_key, "LICIT-ADJUD-POR-LOS-MINIS")
currency_data$`Monto Adjudicado` <- clean_currency(currency_data$`Monto Adjudicado`)
El API de Junar es la base para varias iniciativas de Datos Abiertos en
Latino América y los EEUU. El paquete junr
facilita el acceso a estos
datos des R. El objetivo es fomentar el uso de los datos disponibles
haciendo el acceso lo mas fácil. Algunos ejemplos de implementaciones
son: el Portal de Datos Abiertos del Gobierno de Costa
Rica y la Ciudad de
Córdoba (Argentina) entre otros. Otros se pueden encontrar en el sitio
web de Junar.
Para instalar este paquete desde Github es necesario tener el paquete
devtools
instalado:
install.packages("devtools")
devtools::install_github("FvD/junr")
Para un ejemplo completo por favor consulta la documentación.
Carga el paquete y define el URL y API-Key
library(junr)
url_base <- "http://api.datosabiertos.presidencia.go.cr/api/v2/datastreams/"
api_key <- "El-API-Key-que-obtuviste-de-la-pagina"
Obten un indice de los datos detras del URL
get_index(url_base, api_key)
Para tener solo una lista de los GUID la instrucción puedes usar
list_guid(url_base, api_key)
o para solo un listado de los títulos:
list_titles(url_base, api_key)
Obten un conjunto de datos determinado
guid_datos <- "COMPR-PUBLI-DEL-MINIS"
datos_compras <- get_data(url_base, api_key, guid_datos)
Determina la cantidad de datos disponibles
get_dimensions(url_base, api_key)
Limpiar valores de divisas
datos_con_divisas <- get_data(base_url, api_key, "LICIT-ADJUD-POR-LOS-MINIS")
datos_con_divisas$`Monto Adjudicado` <- clean_currency(datos_con_divisas$`Monto Adjudicado`)