diegovalle / aire.zmvm
Showing 1 of 3 files from the diff.
Other files ignored by Codecov
NEWS.md has changed.
DESCRIPTION has changed.

@@ -71,7 +71,7 @@
Loading
71 71
                   " ACO, AJU, INN, MON, and MPA were excluded from the",
72 72
                   " index"))
73 73
74 -
  url <- "http://www.aire.cdmx.gob.mx/default.php?opc=%27aqBjnmc=%27"
74 +
  url <- "http://www.aire.cdmx.gob.mx/default.php?opc=%27aqBjnmI=%27"
75 75
  fd <- list(
76 76
    fecha       = date,
77 77
    RadioGroup1 = switch(pollutant,
@@ -96,7 +96,7 @@
Loading
96 96
    ), call. = FALSE)
97 97
  if (http_type(result) != "text/html")
98 98
    stop(paste0(url, " did not return text/html", call. = FALSE))
99 -
  poll_table <- read_html(content(result, "text"))
99 +
  poll_table <- read_html(content(result, "text", encoding = "windows-1252"))
100 100
101 101
  df <- html_table(html_nodes(poll_table, "table")[[1]],
102 102
                          header = TRUE,
Files Coverage
R 84.36%
Project Totals (10 files) 84.36%