Plot symbols with colors based on a quantitative data classification.
mf_symb_choro(
x,
var,
pal = "Mint",
alpha = 1,
breaks = "quantile",
nbreaks,
border,
pch,
cex = 1,
lwd = 0.7,
pch_na = 4,
cex_na = 1,
col_na = "white",
val_order,
leg_pos = mf_get_leg_pos(x, 2),
leg_title = var,
leg_title_cex = c(0.8, 0.8),
leg_val_cex = c(0.6, 0.6),
leg_val_rnd = 2,
leg_no_data = c("No data", "No data"),
leg_frame = c(FALSE, FALSE),
add = TRUE
)
object of class sf
name(s) of the variable(s) to plot
a set of colors or a palette name (from hcl.colors)
if pal
is a hcl.colors palette name, the alpha-transparency level in the range [0,1]
either a numeric vector with the actual breaks, or a classification method name (see mf_get_breaks and Details)
number of classes
border color
pch (point type) for symbols
cex (point size) for symbols
border width
pch (point type) for NA values
cex (point size) for NA values
color for missing values
values order, a character vector that matches var modalities
position of the legend, two of 'topleft', 'top','topright', 'right','bottomright', 'bottom', 'bottomleft', 'left' or a vector of two coordinates in map units (c(x, y)). leg_pos argument can be c('position', 'position'), c('position', x2, y2), c(x1,y1, 'position') or c(x1, y1, x2, y2). Use NA to avoid plotting the legend, use 'interactive' to choose thelegend position interactively.
legend title
size of the legend title
size of the values in the legend
number of decimal places of the values in the legend
label for missing values
whether to add a frame to the legend (TRUE) or not (FALSE)
whether to add the layer to an existing plot (TRUE) or not (FALSE)
x is (invisibly) returned.
Breaks defined by a numeric vector or a classification method are
left-closed: breaks defined by c(2, 5, 10, 15, 20)
will be mapped as [2 - 5[, [5 - 10[, [10 - 15[, [15 - 20].
The "jenks" method is an exception and has to be right-closed.
Jenks breaks computed as c(2, 5, 10, 15, 20)
will be mapped as [2 - 5], ]5 - 10], ]10 - 15], ]15 - 20].
mtq <- mf_get_mtq()
mf_map(mtq)
mf_symb_choro(mtq, c("STATUS", "MED"))
mf_map(mtq)
mtq$STATUS[30] <- NA
mtq$MED[5] <- NA
mf_symb_choro(mtq, c("STATUS", "MED"),
pal = "Reds 3", breaks = "quantile", nbreaks = 4,
pch = 21:23, cex = c(3, 2, 1),
pch_na = 25, cex_na = 1.5, col_na = "blue",
val_order = c(
"Prefecture",
"Sub-prefecture",
"Simple municipality"
)
)