Plot proportional symbols with colors based on a quantitative data classification.
mf_prop_choro(
x,
var,
inches = 0.3,
val_max,
symbol = "circle",
pal = "Mint",
alpha = 1,
breaks = "quantile",
nbreaks,
border,
lwd = 0.7,
col_na = "white",
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 = c(0, 2),
leg_no_data = "No data",
leg_frame = c(FALSE, FALSE),
add = TRUE
)
object of class sf
name(s) of the variable(s) to plot
size of the biggest symbol (radius for circles, half width for squares) in inches.
maximum value used for proportional symbols
type of symbols, 'circle' or 'square'
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
border width
color for missing values
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_prop_choro(mtq, c("POP", "MED"))
mf_map(mtq)
mtq[6, "MED"] <- NA
mf_prop_choro(
x = mtq, var = c("POP", "MED"), inches = .35, border = "tomato4",
val_max = 90000, symbol = "circle", col_na = "grey", pal = "Cividis",
breaks = "equal", nbreaks = 4, lwd = 4,
leg_pos = c("bottomright", "bottomleft"),
leg_title = c("Population", "Median Income"),
leg_title_cex = c(0.8, 1),
leg_val_cex = c(.7, .9),
leg_val_rnd = c(0, 0),
leg_no_data = "No data",
leg_frame = c(TRUE, TRUE),
add = TRUE
)