Skip to content

Commit

Permalink
Update tornado paths url
Browse files Browse the repository at this point in the history
The data for 2018 were recently added.
  • Loading branch information
mbjoseph authored and sckott committed Oct 4, 2019
1 parent 9e1bd57 commit 07714b0
Showing 1 changed file with 3 additions and 3 deletions.
6 changes: 3 additions & 3 deletions R/tornadoes.R
Original file line number Diff line number Diff line change
Expand Up @@ -21,7 +21,7 @@
#' shp <- tornadoes()
#' library('sp')
#' if (interactive()) {
#' # may take 10 sec or so to render
#' # may take 10 sec or so to render
#' plot(shp)
#' }
#' }
Expand All @@ -35,7 +35,7 @@ tornadoes <- function(overwrite = TRUE, ...) {
check4pkg('rgdal')
path <- file.path(rnoaa_cache_dir(), "tornadoes")
if (!is_tornadoes(path)) {
url <- 'https://www.spc.noaa.gov/gis/svrgis/zipped/1950-2017-torn-aspath.zip'
url <- 'https://www.spc.noaa.gov/gis/svrgis/zipped/1950-2018-torn-aspath.zip'
tornadoes_GET(path, url, overwrite, ...)
}
readshp(file.path(path, tornadoes_basename))
Expand All @@ -61,7 +61,7 @@ is_tornadoes <- function(x){
}
}

tornadoes_basename <- "1950-2017-torn-aspath"
tornadoes_basename <- "1950-2018-torn-aspath"

readshp <- function(x) rgdal::readOGR(dsn = path.expand(x),
layer = tornadoes_basename,
Expand Down

0 comments on commit 07714b0

Please sign in to comment.