Doc update

DESCRIPTION

@@ -29,7 +29,7 @@ Suggests:
 Type: Package
 Title: Visualizing climate4R data and Communicating Uncertainty in Seasonal Climate Prediction
 Version: 1.6.1
-Date: 2021-02-26
+Date: 2021-03-11
 Author: as.person(c(
     "Santander Meteorology Group <http://meteo.unican.es> [cph]",
     "María Dolores Frías <[email protected]> [aut, cre]",

NEWS

@@ -54,7 +54,7 @@
 * Load example datasets from the new climate4R.datasets package
 * Other documentation and example updates
 
-## v1.6.1 (in devel)
+## v1.6.1 (11 Mar 2021)
 * Minor bug fix and a few adjustments in map.hatching
 * Include WGS84 SpatialLines of world geographic lines (tropics, equator, polar circles) and coastlines in inst folder
 * Include resX and resY attributes in tas.ncep built-in dataset

R/spatialPlot.R

@@ -1,6 +1,6 @@
 #     spatialPlot.R Lattice plot methods for climatological grids
 #
-#     Copyright (C) 2019 Santander Meteorology Group (http://www.meteo.unican.es)
+#     Copyright (C) 2021 Santander Meteorology Group (http://www.meteo.unican.es)
 #
 #     This program is free software: you can redistribute it and/or modify
 #     it under the terms of the GNU General Public License as published by
@@ -387,11 +387,13 @@ map.stippling <- function(clim, threshold = 0.05, condition = "LT", ...) {
 #' dat <- url("http://www.europeanwindstorms.org/repository/Jeanette/Jeanette_track.csv")
 #' custom.coords <- read.csv(dat, header = FALSE)[ ,5:4]
 #' storm <- map.lines(coords = custom.coords,
-#'                    lwd = 3,
-#'                    col = "red") 
+#'                    lwd = 2,
+#'                    col = "purple",
+#'                    lty = 3) 
 #' spatialPlot(climatology(CFS_Iberia_tas, by.member = FALSE), backdrop.theme = "coastline",
-#'                 sp.layout = list(storm), # Add storm track
-#'                 scales = list(draw = TRUE)) # Add coordinate axes
+#'             ylim = c(35, 56), xlim = c(-10, 12),
+#'             sp.layout = list(storm), # Add storm track
+#'             scales = list(draw = TRUE)) # Add coordinate axes
 #' }
 
 map.lines <- function(lonLim = NULL, latLim = NULL, coords = NULL, ...) {