PREGUNTA 1:

La base de datos en GitHub “Elecciones Generales 2016” contiene bases de datos acerca de las elecciones generales de 2016. Específicamente, son cuatro: los congresistas elegidos para ese período y sus partidos, la participación ciudadana en Lima durante esas elecciones congresales, y los resultados de primera y segunda vuelta, a boca de urna, de las presidenciales de ese año.

Repositorio de bases de datos:

library(rio)
## Warning: package 'rio' was built under R version 4.0.5
ELECGEN2016="https://github.com/rafa0303/Elecciones-Generales-2016"
browseURL("https://github.com/rafa0303/Elecciones-Generales-2016")

rvest

  1. Congresistas elegidos para el periodo parlamentario 2016-2021 y sus respectivos partidos:
library(rvest)
## Warning: package 'rvest' was built under R version 4.0.5
urlCONGRESO="https://www.congreso.gob.pe/pleno/congresistas/?=undefined&m1_idP=7"
LISTACONGRESO=read_html(urlCONGRESO)

#Columna “Nombre del congresista”:

clase_nombre="a.conginfo"
nombre_html <- html_nodes(LISTACONGRESO,clase_nombre)
nombre_texto <- html_text(nombre_html)
head(nombre_texto)
## [1] "Acate Coronel Eduardo Geovanni"            
## [2] "Acuña Peralta Humberto"                    
## [3] "Aguilar Zamora Manuel"                     
## [4] "Alencastre Miranda Hirma Norma"            
## [5] "Aliaga Pajares Guillermo Alejandro Antonio"
## [6] "Almerí Veramendi Carlos Alberto"

#Columna “Nombre del partido”:

clase_partido="span.partidolist"
partido_html <- html_nodes(LISTACONGRESO, clase_partido)
partido_texto <- html_text(partido_html)
head(partido_texto)
## [1] "ALIANZA PARA EL PROGRESO" "ALIANZA PARA EL PROGRESO"
## [3] "ACCIÓN POPULAR"           "SOMOS PERÚ"              
## [5] "SOMOS PERÚ"               "PODEMOS PERÚ"
CONGRESO <- data.frame(NOMBRE = nombre_texto, PARTIDO = partido_texto)
head(CONGRESO)
##                                       NOMBRE                  PARTIDO
## 1             Acate Coronel Eduardo Geovanni ALIANZA PARA EL PROGRESO
## 2                     Acuña Peralta Humberto ALIANZA PARA EL PROGRESO
## 3                      Aguilar Zamora Manuel           ACCIÓN POPULAR
## 4             Alencastre Miranda Hirma Norma               SOMOS PERÚ
## 5 Aliaga Pajares Guillermo Alejandro Antonio               SOMOS PERÚ
## 6            Almerí Veramendi Carlos Alberto             PODEMOS PERÚ

importcsv

  1. Participación ciudadana en Lima durante las elecciones congresales de 2016:
LIMACON="https://raw.githubusercontent.com/rafa0303/PRACTICA-CALIFICADA-1/main/Congresal__LIMA.csv"
LIMACON_data=import(LIMACON)
## Warning in (function (input = "", file = NULL, text = NULL, cmd = NULL, :
## Stopped early on line 8. Expected 3 fields but found 1. Consider fill=TRUE and
## comment.char=. First discarded non-empty line: <<"">>
data.frame(LIMACON_data)
##   Electores.hÃ.biles Participación.ciudadana X...Participación.Ciudadana
## 1          7,558,581                5,660,499                       74.888

htmltab

  1. Resultados de primera vuelta (10 de abril de 2016) a boca de urna:
library(htmltab)
## Warning: package 'htmltab' was built under R version 4.0.5
library(rvest)
linkT1 = "https://es.wikipedia.org/wiki/Elecciones_generales_de_Per%C3%BA_de_2016"
pathT1 = "/html/body/div[3]/div[3]/div[5]/div[1]/table[13]/tbody" 
TABLA1 = htmltab(linkT1, pathT1)
TABLA1 <- subset(TABLA1, select = -2) #Se borra la segunda columna que indica las fuentes para Wikipedia.
data.frame(TABLA1)
##   Encuestadora Keiko.Fujimori Pedro.Pablo.Kuczynski Verónika.Mendoza
## 2  Ipsos Perú          37.8%                 20.9%             20.3%
## 3          GfK          39.9%                 20.6%             20.3%
## 4          CPI          39.1%                 19.7%             18.8%
##   Alfredo.Barnechea Alan.GarcÃ.a Gregorio.Santos Alejandro.Toledo Otros
## 2              7.6%         5.8%            3.8%             1.4%  2.4%
## 3                7%         5.5%              4%             1.3%  1.4%
## 4              8.6%         6.6%            3.1%             1.4%  2.7%
export(TABLA1,"TABLA1.csv")
  1. Resultados de segunda vuelta (5 de junio) a boca de urna:
linkT2 = "https://es.wikipedia.org/wiki/Elecciones_generales_de_Per%C3%BA_de_2016"
pathT2 = "/html/body/div[3]/div[3]/div[5]/div[1]/table[16]/tbody"
TABLA2 = htmltab(linkT2, pathT2)
TABLA2 <- subset(TABLA2, select = -2) #Se borra la segunda columna que indica las fuentes para Wikipedia.
data.frame(TABLA2)
##   Encuestadora Pedro.Pablo.Kuczynski Keiko.Fujimori
## 2  Ipsos Perú                 50.4%          49.6%
## 3          GfK                 51.2%          48.8%
## 4          CPI                 48.9%          51.1%
export(TABLA2,"TABLA2.csv")

PREGUNTA 2:

Leyendo la base de datos de los congresistas elegidos para el periodo 2016-2021 y sus respectivos partidos:

fromGitCONGRESO="https://raw.githubusercontent.com/rafa0303/Elecciones-Generales-2016/main/CONGRESO.csv"
CONGRESO=import(fromGitCONGRESO)
str(CONGRESO)
## 'data.frame':    130 obs. of  2 variables:
##  $ NOMBRE : chr  "Acate Coronel Eduardo Geovanni" "Acuña Peralta Humberto" "Aguilar Zamora Manuel" "Alencastre Miranda Hirma Norma" ...
##  $ PARTIDO: chr  "ALIANZA PARA EL PROGRESO" "ALIANZA PARA EL PROGRESO" "ACCIÓN POPULAR" "SOMOS PERÚ" ...
export(CONGRESO,"CONGRESO.csv")

Leyendo la base de datos de la participación ciudadana durante las elecciones congresales de 2016:

fromGitLIMACON="https://raw.githubusercontent.com/rafa0303/Elecciones-Generales-2016/main/Congresal__LIMA.csv"
LIMACON_data=import(fromGitLIMACON)
## Warning in (function (input = "", file = NULL, text = NULL, cmd = NULL, :
## Stopped early on line 8. Expected 3 fields but found 1. Consider fill=TRUE and
## comment.char=. First discarded non-empty line: <<"">>
str(LIMACON_data)
## 'data.frame':    1 obs. of  3 variables:
##  $ Electores hábiles         : chr "7,558,581"
##  $ Participación ciudadana   : chr "5,660,499"
##  $ (%)Participación Ciudadana: num 74.9

Leyendo la base de datos de los resultados de la primera vuelta, a boca de urna, de las elecciones presidenciales 2016:

fromGitTABLA1="https://raw.githubusercontent.com/rafa0303/Elecciones-Generales-2016/main/TABLA1.csv"
TABLA1=import(fromGitTABLA1)
str(TABLA1)
## 'data.frame':    3 obs. of  9 variables:
##  $ Encuestadora         : chr  "Ipsos Perú" "GfK" "CPI"
##  $ Keiko Fujimori       : chr  "37.8%" "39.9%" "39.1%"
##  $ Pedro Pablo Kuczynski: chr  "20.9%" "20.6%" "19.7%"
##  $ Verónika Mendoza    : chr  "20.3%" "20.3%" "18.8%"
##  $ Alfredo Barnechea    : chr  "7.6%" "7%" "8.6%"
##  $ Alan García         : chr  "5.8%" "5.5%" "6.6%"
##  $ Gregorio Santos      : chr  "3.8%" "4%" "3.1%"
##  $ Alejandro Toledo     : chr  "1.4%" "1.3%" "1.4%"
##  $ Otros                : chr  "2.4%" "1.4%" "2.7%"

Leyendo la base de datos de los resultados de la segunda vuelta, a boca de urna, de las elecciones presidenciales 2016:

fromGitTABLA2="https://raw.githubusercontent.com/rafa0303/Elecciones-Generales-2016/main/TABLA2.csv"
TABLA2=import(fromGitTABLA2)
str(TABLA2)
## 'data.frame':    3 obs. of  3 variables:
##  $ Encuestadora         : chr  "Ipsos Perú" "GfK" "CPI"
##  $ Pedro Pablo Kuczynski: chr  "50.4%" "51.2%" "48.9%"
##  $ Keiko Fujimori       : chr  "49.6%" "48.8%" "51.1%"

Respuesta:

La base de datos con mayor número de resultados es la base CONGRESO, que recoge los datos de los congresistas elegidos y sus respectivos partidos, siendo estos 130. Las demás bases recogen, naturalmente, menos observaciones; la base LIMACON_data recoge la participación ciudadana en Lima, que constituye solo una observación; por su parte, las bases TABLA1 y TABLA2 solo tienen 3 observaciones cada una dado que recogen los resultados de las tres encuestadoras que encuestaron a boca de urna en cada una de la primera y segunda vuelta de las elecciones presidenciales de 2016.

Por otro lado, la base de datos con mayor número de variables es la base TABLA1, pues sus variables corresponden a la cantidad de postulantes que se presentaron a la primera vuelta de las elecciones presidenciales 2016 (9) siendo, naturalmente, un número más alto que el de la segunda vuelta de dichas elecciones (3, base TABLA2). Además, las bases CONGRESO y LIMACON_data solo registran, respectivamente, a los congresistas electos y sus partidos (2 variables) y la participación ciudadana (3 variables: electores hábiles, participación y porcentaje de participación).

PREGUNTA 3:

Sobre la encuesta realizada a un grupo de alumnos de la facultad de EEGGLL sobre su participación y percepción acerca de la política universitaria, se tienen los siguientes datos:

Encuesta: https://docs.google.com/forms/d/1z9UDokYvxRWgIs2LEBz50ltuPCBnBBF6xQfNE4rufBM

ENCUESTAPOLUNIV=("https://docs.google.com/spreadsheets/d/e/2PACX-1vQnU7OMoKuEtMZnNN0Jlvz5RKxXUDLd6bVcQjLL9HIWf4FvuxLpw46FF-szWDeY44aGXDVkAIYMuI1J/pub?output=csv")
RESULTADOSPOLUNIV=read.csv(ENCUESTAPOLUNIV)
RESULTADOSPOLUNIV <- subset(RESULTADOSPOLUNIV, select = -1) #Se borra la primera columna que indica la hora en la que se llenó el formulario.
data.frame(RESULTADOSPOLUNIV)
##    TIEMPOPOLUNIV VECESREPRE PUNTUACOGOB PUNTUAGREMIO      COMODIDADPOLUNIV
## 1              4          2           4            2          Muy incomodo
## 2              3          2           3            3              Incomodo
## 3              4          3           4            3              Incomodo
## 4              3          2           5            3                Comodo
## 5              3          2           4            2              Incomodo
## 6              4          3           4            3          Muy incomodo
## 7              3          1           4            2              Incomodo
## 8              2          1           3            5 Ni comodo ni incomodo
## 9              2          1           4            1          Muy incomodo
## 10             3          1           4            3          Muy incomodo
## 11             4          4           5            3              Incomodo
str(RESULTADOSPOLUNIV)
## 'data.frame':    11 obs. of  5 variables:
##  $ TIEMPOPOLUNIV   : int  4 3 4 3 3 4 3 2 2 3 ...
##  $ VECESREPRE      : int  2 2 3 2 2 3 1 1 1 1 ...
##  $ PUNTUACOGOB     : int  4 3 4 5 4 4 4 3 4 4 ...
##  $ PUNTUAGREMIO    : int  2 3 3 3 2 3 2 5 1 3 ...
##  $ COMODIDADPOLUNIV: chr  "Muy incomodo" "Incomodo" "Incomodo" "Comodo" ...

PREGUNTA 4:

Repositorio de mapas: https://github.com/rafa0303/Mapas

Los archivos se descargan y se convierten a formato topojson con la herramienta mapshaper. El archivo topojson se sube al repositorio en GitHub. Estos pasos se repiten con cada uno de los mapas. Las bases de datos json se leen en R de la siguiente forma:

Mapa 1

Mapa de vialidad en China. Extraído de: https://tapiquen-sig.jimdofree.com/descargas-gratuitas/china/

library(sp)
## Warning: package 'sp' was built under R version 4.0.5
library(rgdal)
## Warning: package 'rgdal' was built under R version 4.0.5
## Please note that rgdal will be retired by the end of 2023,
## plan transition to sf/stars/terra functions using GDAL and PROJ
## at your earliest convenience.
## 
## rgdal: version: 1.5-25, (SVN revision 1143)
## Geospatial Data Abstraction Library extensions to R successfully loaded
## Loaded GDAL runtime: GDAL 3.2.1, released 2020/12/29
## Path to GDAL shared files: C:/Users/RAFAEL/Documents/R/win-library/4.0/rgdal/gdal
## GDAL binary built with GEOS: TRUE 
## Loaded PROJ runtime: Rel. 7.2.1, January 1st, 2021, [PJ_VERSION: 721]
## Path to PROJ shared files: C:/Users/RAFAEL/Documents/R/win-library/4.0/rgdal/proj
## PROJ CDN enabled: FALSE
## Linking to sp version:1.4-5
## To mute warnings of possible GDAL/OSR exportToProj4() degradation,
## use options("rgdal_show_exportToProj4_warnings"="none") before loading sp or rgdal.
## Overwritten PROJ_LIB was C:/Users/RAFAEL/Documents/R/win-library/4.0/rgdal/proj
MAP1=("https://raw.githubusercontent.com/rafa0303/Mapas/main/China_Vialidad.json")
VIALIDADCHINA <- rgdal::readOGR(MAP1,stringsAsFactors = FALSE)
## OGR data source with driver: TopoJSON 
## Source: "https://raw.githubusercontent.com/rafa0303/Mapas/main/China_Vialidad.json", layer: "China_Vialidad"
## with 27255 features
## It has 2 fields
plot(VIALIDADCHINA)

Mapa 2

Mapa de las comunidades campesinas en Perú. Extraído de: https://www.geogpsperu.com/2017/08/shapefile-de-comunidades-campesinas.html

MAP2=("https://raw.githubusercontent.com/rafa0303/Mapas/main/Comunidades%20Campesinas%20Minagri%20geogpsperu%20juansuyo.json")
COMCAMPE <- rgdal::readOGR(MAP2,stringsAsFactors = FALSE)
## OGR data source with driver: TopoJSON 
## Source: "https://raw.githubusercontent.com/rafa0303/Mapas/main/Comunidades%20Campesinas%20Minagri%20geogpsperu%20juansuyo.json", layer: "Comunidades Campesinas Minagri geogpsperu juansuyo"
## with 4177 features
## It has 16 fields
plot(COMCAMPE)

Mapa 3

Mapa de las comunidades nativas en Perú. Extraído de: https://www.geogpsperu.com/2015/10/mapa-de-comunidades-nativas-ibc-online.html

MAP3=("https://raw.githubusercontent.com/rafa0303/Mapas/main/COMUNIDADES_NATIVAS_geogpsperu%20juansuyo%20931381206.json")
COMNATIV <- rgdal::readOGR(MAP3,stringsAsFactors = FALSE)
## OGR data source with driver: TopoJSON 
## Source: "https://raw.githubusercontent.com/rafa0303/Mapas/main/COMUNIDADES_NATIVAS_geogpsperu%20juansuyo%20931381206.json", layer: "COMUNIDADES_NATIVAS_geogpsperu juansuyo 931381206"
## with 1945 features
## It has 19 fields
plot(COMNATIV)

PREGUNTA 5:

La siguiente API corresponde a la base de datos de ventas anuales nacionales de combustibles líquidos registrada por Energía Abierta de Chile.

Se obtiene una API Key y el GUID de la base de datos:

KEY: 0GSuboLkyfq6Pw89I5xxQAZ7zkaX4HcjSjbrOxh4 GUID: VENTA-ANUAL-NACIO-DE-COMBU

require("httr")
## Loading required package: httr
## Warning: package 'httr' was built under R version 4.0.5
require("jsonlite")
## Loading required package: jsonlite
## Warning: package 'jsonlite' was built under R version 4.0.5
response <- GET( url = "http://cne.cloudapi.junar.com/api/v2/datastreams/VENTA-ANUAL-NACIO-DE-COMBU/data.ajson/?auth_key=0GSuboLkyfq6Pw89I5xxQAZ7zkaX4HcjSjbrOxh4&limit=50&")
response_text <- content(response,"text")
response_json <- fromJSON(response_text)
response_json
## $result
##       [,1]   [,2]         [,3]                    [,4]                  
##  [1,] "anio" "region_cod" "region_nombre"         "grupo_combustible"   
##  [2,] "2006" "1"          "Región de Tarapacá"    "Aviación"            
##  [3,] "2006" "1"          "Región de Tarapacá"    "Aviación"            
##  [4,] "2006" "1"          "Región de Tarapacá"    "Doméstico"           
##  [5,] "2006" "1"          "Región de Tarapacá"    "Gasolina"            
##  [6,] "2006" "1"          "Región de Tarapacá"    "Gasolina"            
##  [7,] "2006" "1"          "Región de Tarapacá"    "Gasolina"            
##  [8,] "2006" "1"          "Región de Tarapacá"    "Gasolina"            
##  [9,] "2006" "1"          "Región de Tarapacá"    "Petróleo Combustible"
## [10,] "2006" "1"          "Región de Tarapacá"    "Petróleo Combustible"
## [11,] "2006" "1"          "Región de Tarapacá"    "Petróleo Diesel"     
## [12,] "2006" "1"          "Región de Tarapacá"    "Petróleo Diesel"     
## [13,] "2006" "1"          "Región de Tarapacá"    "Petróleo Diesel"     
## [14,] "2006" "2"          "Región de Antofagasta" "Aviación"            
## [15,] "2006" "2"          "Región de Antofagasta" "Aviación"            
## [16,] "2006" "2"          "Región de Antofagasta" "Doméstico"           
## [17,] "2006" "2"          "Región de Antofagasta" "Gasolina"            
## [18,] "2006" "2"          "Región de Antofagasta" "Gasolina"            
## [19,] "2006" "2"          "Región de Antofagasta" "Gasolina"            
## [20,] "2006" "2"          "Región de Antofagasta" "Petróleo Combustible"
## [21,] "2006" "2"          "Región de Antofagasta" "Petróleo Combustible"
## [22,] "2006" "2"          "Región de Antofagasta" "Petróleo Combustible"
## [23,] "2006" "2"          "Región de Antofagasta" "Petróleo Diesel"     
## [24,] "2006" "2"          "Región de Antofagasta" "Petróleo Diesel"     
## [25,] "2006" "2"          "Región de Antofagasta" "Petróleo Diesel"     
## [26,] "2006" "2"          "Región de Antofagasta" "Petróleo Diesel"     
## [27,] "2006" "2"          "Región de Antofagasta" "Petróleo Diesel"     
## [28,] "2006" "3"          "Región de Atacama"     "Aviación"            
## [29,] "2006" "3"          "Región de Atacama"     "Aviación"            
## [30,] "2006" "3"          "Región de Atacama"     "Doméstico"           
## [31,] "2006" "3"          "Región de Atacama"     "Gasolina"            
## [32,] "2006" "3"          "Región de Atacama"     "Gasolina"            
## [33,] "2006" "3"          "Región de Atacama"     "Gasolina"            
## [34,] "2006" "3"          "Región de Atacama"     "Petróleo Combustible"
## [35,] "2006" "3"          "Región de Atacama"     "Petróleo Combustible"
## [36,] "2006" "3"          "Región de Atacama"     "Petróleo Combustible"
## [37,] "2006" "3"          "Región de Atacama"     "Petróleo Combustible"
## [38,] "2006" "3"          "Región de Atacama"     "Petróleo Diesel"     
## [39,] "2006" "3"          "Región de Atacama"     "Petróleo Diesel"     
## [40,] "2006" "3"          "Región de Atacama"     "Petróleo Diesel"     
## [41,] "2006" "3"          "Región de Atacama"     "Petróleo Diesel"     
## [42,] "2006" "3"          "Región de Atacama"     "Petróleo Diesel"     
## [43,] "2006" "4"          "Región de Coquimbo"    "Aviación"            
## [44,] "2006" "4"          "Región de Coquimbo"    "Doméstico"           
## [45,] "2006" "4"          "Región de Coquimbo"    "Gasolina"            
## [46,] "2006" "4"          "Región de Coquimbo"    "Gasolina"            
## [47,] "2006" "4"          "Región de Coquimbo"    "Gasolina"            
## [48,] "2006" "4"          "Región de Coquimbo"    "Petróleo Combustible"
## [49,] "2006" "4"          "Región de Coquimbo"    "Petróleo Combustible"
## [50,] "2006" "4"          "Región de Coquimbo"    "Petróleo Combustible"
##       [,5]                           [,6]                    [,7]        
##  [1,] "tipo_combustible"             "tipo_de_venta"         "volumen_m3"
##  [2,] "Gasolina Aviación"            "Empresa Distribuidora" "622"       
##  [3,] "Kerosene Aviación"            "Empresa Distribuidora" "44,735"    
##  [4,] "Kerosene Doméstico"           "Empresa Distribuidora" "474"       
##  [5,] "Gasolina 81"                  "Empresa Distribuidora" "438"       
##  [6,] "Gasolina 93"                  "Empresa Distribuidora" "35,861"    
##  [7,] "Gasolina 95"                  "Empresa Distribuidora" "11,268"    
##  [8,] "Gasolina 97"                  "Empresa Distribuidora" "28,825"    
##  [9,] "Petróleo Combustible IFO 180" "Empresa Distribuidora" "15,221"    
## [10,] "Petróleo Combustible N°6"     "Empresa Distribuidora" "112,402"   
## [11,] "Petróleo Diésel A1"           "Empresa Distribuidora" "119"       
## [12,] "Petróleo Diésel B"            "directa enap"          "2,187"     
## [13,] "Petróleo Diésel B"            "Empresa Distribuidora" "487,749"   
## [14,] "Gasolina Aviación"            "Empresa Distribuidora" "116"       
## [15,] "Kerosene Aviación"            "Empresa Distribuidora" "40,785"    
## [16,] "Kerosene Doméstico"           "Empresa Distribuidora" "10,729"    
## [17,] "Gasolina 93"                  "Empresa Distribuidora" "53,148"    
## [18,] "Gasolina 95"                  "Empresa Distribuidora" "19,623"    
## [19,] "Gasolina 97"                  "Empresa Distribuidora" "33,195"    
## [20,] "Petróleo Combustible IFO 180" "Empresa Distribuidora" "42,164"    
## [21,] "Petróleo Combustible N°5"     "Empresa Distribuidora" "5"         
## [22,] "Petróleo Combustible N°6"     "Empresa Distribuidora" "101,556"   
## [23,] "Petróleo Diésel"              "Empresa Distribuidora" "70"        
## [24,] "Petróleo Diésel A1"           "Empresa Distribuidora" "66"        
## [25,] "Petróleo Diésel B"            "directa enap"          "2,087"     
## [26,] "Petróleo Diésel B"            "Empresa Distribuidora" "1,005,297" 
## [27,] "Petróleo Diésel Invernal"     "Empresa Distribuidora" "657"       
## [28,] "Gasolina Aviación"            "Empresa Distribuidora" "37"        
## [29,] "Kerosene Aviación"            "Empresa Distribuidora" "2,723"     
## [30,] "Kerosene Doméstico"           "Empresa Distribuidora" "134"       
## [31,] "Gasolina 93"                  "Empresa Distribuidora" "24,951"    
## [32,] "Gasolina 95"                  "Empresa Distribuidora" "14,667"    
## [33,] "Gasolina 97"                  "Empresa Distribuidora" "13,887"    
## [34,] "Petróleo Combustible IFO 180" "directa enap"          "56,314"    
## [35,] "Petróleo Combustible IFO 180" "Empresa Distribuidora" "113,388"   
## [36,] "Petróleo Combustible N°6"     "directa enap"          "6,249"     
## [37,] "Petróleo Combustible N°6"     "Empresa Distribuidora" "42,364"    
## [38,] "Petróleo Diésel"              "Empresa Distribuidora" "2,421"     
## [39,] "Petróleo Diésel A1"           "Empresa Distribuidora" "19"        
## [40,] "Petróleo Diésel B"            "directa enap"          "1,413"     
## [41,] "Petróleo Diésel B"            "Empresa Distribuidora" "320,171"   
## [42,] "Petróleo Diésel Invernal"     "Empresa Distribuidora" "31,559"    
## [43,] "Kerosene Aviación"            "Empresa Distribuidora" "5,209"     
## [44,] "Kerosene Doméstico"           "Empresa Distribuidora" "526"       
## [45,] "Gasolina 93"                  "Empresa Distribuidora" "59,381"    
## [46,] "Gasolina 95"                  "Empresa Distribuidora" "31,691.5"  
## [47,] "Gasolina 97"                  "Empresa Distribuidora" "33,372"    
## [48,] "Petróleo Combustible IFO 180" "Empresa Distribuidora" "358"       
## [49,] "Petróleo Combustible N°5"     "Empresa Distribuidora" "3,691"     
## [50,] "Petróleo Combustible N°6"     "Empresa Distribuidora" "29,963"    
## 
## $status
## [1] 3
## 
## $description
## [1] "Evolución histórica del volumen de venta de combustibles. Unidades en m3."
## 
## $parameters
## list()
## 
## $tags
## [1] "volumen"      "ventas"       "combustibles"
## 
## $last_revision_id
## [1] 282149
## 
## $timestamp
## NULL
## 
## $created_at
## [1] "2021-08-30T16:46:54Z"
## 
## $title
## [1] "Ventas anuales nacionales de combustibles líquidos"
## 
## $modified_at
## [1] "2021-08-30T19:48:12Z"
## 
## $category_id
## [1] 41210
## 
## $methods
## NULL
## 
## $sources
## list()
## 
## $total_revisions
## [1] 4
## 
## $frequency
## [1] ""
## 
## $link
## NULL
## 
## $user
## [1] "gamorav"
## 
## $status_str
## NULL
## 
## $guid
## [1] "VENTA-ANUAL-NACIO-DE-COMBU"
## 
## $category_name
## [1] "Hidrocarburos"
## 
## $endpoint
## [1] "dropbox://energia_abierta/catalago_estadisticas/sh_venta_combustibles_liquidos_anual.xlsx"