#1195

mtennekes · mtennekes · commit 9d1a9481045e · 2025-09-08T15:23:45.000+02:00
diff --git a/R/spatial_sf.R b/R/spatial_sf.R
@@ -65,7 +65,7 @@ tmapSubsetShp.sf = function(shp, vars) {
 		shp$LENGTH = sf::st_length(shp)
 	}
 	if ("MAP_COLORS" %in% vars) {
-		shp$MAP_COLORS = as.factor(tmaptools::map_coloring(shp))
+		shp$MAP_COLORS = as.factor(tmaptools::map_coloring(shp, ncols = 7))
 	}
 
 	if (!length(vars)) {
@@ -86,7 +86,7 @@ tmapSubsetShp.sfc = function(shp, vars) {
 		s$LENGTH = sf::st_length(shp)
 	}
 	if ("MAP_COLORS" %in% vars) {
-		s$MAP_COLORS = tmaptools::map_coloring(s)
+		s$MAP_COLORS = as.factor(tmaptools::map_coloring(shp, ncols = 7))
 	}
 	s
 }

Original file line number	Diff line number	Diff line change
`@@ -65,7 +65,7 @@ tmapSubsetShp.sf = function(shp, vars) {`
`65`	`65`	`shp$LENGTH = sf::st_length(shp)`
`66`	`66`	`}`
`67`	`67`	`if ("MAP_COLORS" %in% vars) {`
`68`		`- shp$MAP_COLORS = as.factor(tmaptools::map_coloring(shp))`
	`68`	`+ shp$MAP_COLORS = as.factor(tmaptools::map_coloring(shp, ncols = 7))`
`69`	`69`	`}`
`70`	`70`
`71`	`71`	`if (!length(vars)) {`
`@@ -86,7 +86,7 @@ tmapSubsetShp.sfc = function(shp, vars) {`
`86`	`86`	`s$LENGTH = sf::st_length(shp)`
`87`	`87`	`}`
`88`	`88`	`if ("MAP_COLORS" %in% vars) {`
`89`		`- s$MAP_COLORS = tmaptools::map_coloring(s)`
	`89`	`+ s$MAP_COLORS = as.factor(tmaptools::map_coloring(shp, ncols = 7))`
`90`	`90`	`}`
`91`	`91`	`s`
`92`	`92`	`}`