diff --git a/src/municipalities/03-attainment-ts.R b/src/municipalities/03-attainment-ts.R index 4350626..928d862 100644 --- a/src/municipalities/03-attainment-ts.R +++ b/src/municipalities/03-attainment-ts.R @@ -34,7 +34,6 @@ GENDERS <- list("1", "2") # Fetch municipality codes from table metadata meta <- fromJSON(content(GET(SCB_URL), "text", encoding = "UTF-8")) munis <- Filter(\(x) nchar(x) == 4, meta$variables$values[[1]]) -cat("Municipalities to fetch:", length(munis), "\n") # Batch fetch: 50 municipalities per request fetch_batch <- function(muni_batch) {