diff --git a/DESCRIPTION b/DESCRIPTION
index 32f7865..f36d5c8 100755
--- a/DESCRIPTION
+++ b/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 <friasmd@unican.es> [aut, cre]",
diff --git a/NEWS b/NEWS
index 06e362a..3163873 100755
--- a/NEWS
+++ b/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
diff --git a/R/spatialPlot.R b/R/spatialPlot.R
index fb4e7a2..dbe626f 100644
--- a/R/spatialPlot.R
+++ b/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, ...) {
diff --git a/man/map.lines.Rd b/man/map.lines.Rd
index e9c4e49..471fe93 100644
--- a/man/map.lines.Rd
+++ b/man/map.lines.Rd
@@ -65,11 +65,13 @@ spatialPlot(climatology(CFS_Iberia_tas, by.member = FALSE), backdrop.theme = "co
 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
 }
 }
 \seealso{