title: “LAB_39”

author: “JESSICA PAOLA AGUILAR SERVIN”

date: “2023-03-03”

output: html_document

INSTALAR PAQUETERIA install.packages(“jsonlite”)

LLAMAR LIBRERIA

library(jsonlite)

BUSCAR ARCHIVO file.choose()

DESCARGAR DATOS DE API

datos_api2 <- fromJSON("C:\\Users\\gusta\\OneDrive\\Documents\\GitHub\\JPAS_LABS39\\INPUT\\Municipality-Year-records.json")

CREAR LISTA

class(datos_api2)

## [1] "list"

names(datos_api2)

## [1] "data"   "source"

VER TABLA

View(datos_api2[["data"]])

CREAR FRAME

final_API <- as.data.frame((datos_api2[["data"]]))
class(final_API)

## [1] "data.frame"

GUARDAR ARCHIVO EN CVS

write.csv(final_API, file = "final_API.CSV")