fixes #1475

rspatial · May 3, 2024 · 3ba48be · 3ba48be
1 parent ca73463
commit 3ba48be
Showing 1 changed file with 7 additions and 4 deletions.
diff --git a/R/plot_let.R b/R/plot_let.R
@@ -68,11 +68,14 @@ baselayers <- function(tiles, wrap=TRUE) {
 	out <- list(v=v, leg=list())
 
 	if (is.null(type)) type <- ""
-	if (type == "continuous") type <- "interval"	
-	if ((!is.numeric(v)) || (length(unique(v)) < 11)) {
-		type <- "classes"
+	if (type == "continuous") {
+		type <- "interval"	
 	} else if (type == "") {
-		type <- "interval"
+		if ((!is.numeric(v)) || (length(unique(v)) < 11)) {
+			type <- "classes"
+		} else {
+			type <- "interval"
+		}
 	} else {
 		type <- match.arg(type, c("interval", "classes"))
 	}