factor key sizes

Author: edzer

R/plot.R

@@ -933,7 +933,7 @@ xy_from_r = function(r, l, o) {
 			xlab = "", ylab = "", xaxs = "i", yaxs = "i")
 		},
 		error = function(x) {
-			sz = max(strwidth(z, "inches")) * 2.54 + par("ps")/12 # cm
+			sz = max(strwidth(z, "inches")) * 2.54 * 1.1 + par("ps")/12 # cm
 			stop(paste0("key.width too small, try key.width = lcm(", signif(sz, 3), ")"), call. = FALSE)
 		}
 	)

vignettes/sf5.Rmd

@@ -81,7 +81,7 @@ Keys for factor variables are a bit different, as we typically don't want to rot
 
 ```{r}
 nc$f = cut(nc$AREA, 10)
-plot(nc["f"], axes = TRUE, key.pos = 4, pal = sf.colors(10), key.width = lcm(4.5))
+plot(nc["f"], axes = TRUE, key.pos = 4, pal = sf.colors(10), key.width = lcm(5))
 ```
 
 # Class intervals