resp <- ine_api("/wstempus/js/EN/OPERACIONES_DISPONIBLES")
dat <- jsonlite::fromJSON(content(resp, "text"))
## write.table(dat, file = "/home/xps13/src/R/stanData/data-raw/API/ESP/list_datasets.tsv", sep = "\t", row.names = FALSE)
knitr::kable(head(dat, n = n_table))| Id | Cod_IOE | Nombre | Codigo |
|---|---|---|---|
| 4 | 30147 | Estadística de Efectos de Comercio Impagados | EI |
| 6 | 30211 | Índice de Coste Laboral Armonizado | ICLA |
| 10 | 30256 | Indicadores Urbanos | UA |
| 13 | 30219 | Estadística del Procedimiento Concursal | EPC |
| 14 | 30182 | Índices de Precios del Sector Servicios | IPS |