tm_layout unnamed title message added

r-tmap · Apr 25, 2024 · 9c7c410 · 9c7c410
1 parent ac555af
commit 9c7c410
Show file tree

Hide file tree

Showing 3 changed files with 7 additions and 2 deletions.
diff --git a/R/tm_layout.R b/R/tm_layout.R
@@ -88,6 +88,11 @@ tm_layout = function(
 
  ) {
  args = lapply(as.list(match.call()[-1]), eval, envir = parent.frame())
+ if (!missing(modes) && is.character(modes)) {
+ title = modes
+ args$modes = NULL
+ }
+
  if (!is.null(title) || (!is.null(main.title))) {
  title1 = if (!is.null(title)) {
  title.args = args[substr(names(args), 1, 5) == "title"]

diff --git a/examples/tm_symbols.R b/examples/tm_symbols.R
@@ -34,7 +34,7 @@ tm_shape(land) +
 library(sf)
 x = st_as_sf(cbind(expand.grid(x = -51:-47, y = 20:24), id = seq_len(25)), coords = c("x", "y"), crs = 4326)
 
-tm_shape(x, bbox = bb(x, ext = 1.1)) +
+tm_shape(x, bbox = bb(x, ext = 1.2)) +
  tm_symbols(shape = "id",
  size = 2,
  lwd = 2,

diff --git a/man/tm_symbols.Rd b/man/tm_symbols.Rd