Add curl to suggested section (in order to run example)

DESCRIPTION

@@ -4,6 +4,7 @@ Title: Import KNMI Data
 Version: 0.1.5.6
 Authors@R: person("Martin", "Roth", email = "[email protected]",
  role = c("aut", "cre"))
+Date: 2017-03-11
 Description: Import KNMI data into R.
 License: MIT + file LICENSE
 LazyData: TRUE
@@ -33,4 +34,5 @@ SystemRequirements: netcdf library version 4.1 or later
 Suggests:
  testthat,
  rgeos,
- raster
+ raster,
+ curl

R/EOBS.R

@@ -221,8 +221,8 @@ removeOutsiders <- function(data, area) {
  lon <- lat <- pointID <- NULL
  setkey(data, lon, lat)
  data[, pointID:=.GRP, by=key(data)]
- coords <- data[, .(lon = unique(lon),
-  lat = unique(lat)), by = pointID][, .(lon, lat)]
+ coords <- data[, list(lon = unique(lon), lat = unique(lat)),
+ by = pointID][, list(lon, lat)]
  points <- sp::SpatialPoints(coords, area@proj4string)
  index <- data[, unique(pointID)][which(!is.na(sp::over(points,
  as(area, 'SpatialPolygons'))))]

R/TechnicalImport.R

@@ -8,6 +8,7 @@ ReadZippedFile <- function(url, colNames) {
 }
 
 UpdateJsonTable <- function(jsonTable) {
+ depth <- lat <- lon <- mag <- NULL
  tmp <- as.data.table(jsonTable)
  tmp[, date := as.Date(date, tz = "CET")]
  tmp[, depth := as.numeric(depth)]