url.base now defined within get_data function

SevillaR · Mar 17, 2018 · 4bd2bb8 · 4bd2bb8
1 parent d051bbf
commit 4bd2bb8
Show file tree

Hide file tree

Showing 3 changed files with 2 additions and 3 deletions.
diff --git a/R/get_data.R b/R/get_data.R
@@ -11,6 +11,8 @@
 #'
 get_data <- function(apidest, apikey) {
 
+  url.base <- "https://opendata.aemet.es/opendata"
+
   url1 <- paste0(url.base, apidest)
 
   path1 <- httr::GET(url1, add_headers(api_key = apikey))

diff --git a/R/sysdata.rda b/R/sysdata.rda
diff --git a/data-raw/config.R b/data-raw/config.R