fixes #1394

rspatial · Jan 9, 2024 · 97b13da · 97b13da
1 parent 7224c41
commit 97b13da
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/R/plot_raster.R b/R/plot_raster.R
@@ -553,6 +553,10 @@ prettyNumbs <- function(x, digits) {
 	out <- list()
 	e <- out$lim <- out$ext <- as.vector(ext(x))
 	hadWin <- hasWin <- FALSE
+	if (add && is.null(ext)) {
+		ext <- unlist(get.clip())[1:4]
+	}
+
 	if ((!is.null(ext)) || (!is.null(xlim)) || (!is.null(ylim))) {
 		if (!is.null(ext)) {
 			ext <- ext(ext)