View source: R/tm_misc_elements.R
tm_facets | R Documentation |
Creates a tmap-element
that specifies facets (small multiples). Small multiples can be created in two ways: 1) by specifying the by
argument with one or two variable names, by which the data is grouped, 2) by specifying multiple variable names in any of the aesthetic argument of the layer functions (for instance, the argument col
in tm_fill
). This function further specifies the facets, for instance number of rows and columns, and whether the coordinate and scales are fixed or free (i.e. independent of each other). An overview of the different approaches to create facets is provided in the examples.
tm_facets(
by = NULL,
along = NULL,
as.layers = FALSE,
ncol = NA,
nrow = NA,
free.coords = !as.layers,
drop.units = TRUE,
drop.empty.facets = TRUE,
drop.NA.facets = FALSE,
sync = NA,
showNA = NA,
textNA = "Missing",
free.scales = NULL,
free.scales.fill = NULL,
free.scales.symbol.size = NULL,
free.scales.symbol.col = NULL,
free.scales.symbol.shape = NULL,
free.scales.text.size = NULL,
free.scales.text.col = NULL,
free.scales.line.col = NULL,
free.scales.line.lwd = NULL,
free.scales.raster = NULL,
inside.original.bbox = FALSE,
scale.factor = 2,
drop.shapes = drop.units
)
by |
data variable name by which the data is split, or a vector of two variable names to split the data by two variables (where the first is used for the rows and the second for the columns). |
along |
data variable name by which the data is split and plotted on separate pages. This is especially useful for animations made with |
as.layers |
logical that determines whether facets are shown as different layers in |
ncol |
number of columns of the small multiples grid. Not applicable if |
nrow |
number of rows of the small multiples grid. Not applicable if |
free.coords |
logical. If the |
drop.units |
logical. If the |
drop.empty.facets |
logical. If the |
drop.NA.facets |
logical. If the |
sync |
logical. Should the navigation in view mode (zooming and panning) be synchronized? By default |
showNA |
If the |
textNA |
text used for facets of missing values. |
free.scales |
logical. Should all scales of the plotted data variables be free, i.e. independent of each other? Specific scales can be set with |
free.scales.fill |
logical. Should the color scale for the choropleth be free? |
free.scales.symbol.size |
logical. Should the symbol size scale for the symbol map be free? |
free.scales.symbol.col |
logical. Should the color scale for the symbol map be free? |
free.scales.symbol.shape |
logical. Should the symbol shape scale for the symbol map be free? |
free.scales.text.size |
logical. Should the text size scale be free? |
free.scales.text.col |
logical. Should the text color scale be free? |
free.scales.line.col |
Should the line color scale be free? |
free.scales.line.lwd |
Should the line width scale be free? |
free.scales.raster |
Should the color scale for raster layers be free? |
inside.original.bbox |
If |
scale.factor |
Number that determines how the elements (e.g. font sizes, symbol sizes, line widths) of the small multiples are scaled in relation to the scaling factor of the shapes. The elements are scaled to the |
drop.shapes |
deprecated: renamed to |
The global option limits
controls the limit of the number of facets that are plotted. By default, tmap_options(limits=c(facets.plot=64, facets.view=4))
. The maximum number of interactive facets is set to four since otherwise it may become very slow.
tmap-element
Tennekes, M., 2018, tmap: Thematic Maps in R, Journal of Statistical Software, 84(6), 1-39, \Sexpr[results=rd]{tools:::Rd_expr_doi("10.18637/jss.v084.i06")}
data(World, NLD_muni, NLD_prov, land, metro)
current.mode <- tmap_mode("plot")
# CASE 1: Facets defined by constant values
tm_shape(World) +
tm_fill(c("forestgreen", "goldenrod")) +
tm_format("World", title=c("A green world", "A dry world"), bg.color="lightskyblue2",
title.position=c("left", "bottom"))
# CASE 2: Facets defined by multiple variables
tm_shape(World) +
tm_polygons(c("well_being", "life_exp"),
style=c("pretty", "fixed"), breaks=list(NULL, seq(45, 85, by = 5)),
palette=list("Oranges", "Purples"),
border.col = "black",
title=c("Well-Being Index", "Life Expectancy")) +
tm_format("World")
## Not run:
tm_shape(NLD_muni) +
tm_fill(c("pop_0_14", "pop_15_24", "pop_25_44", "pop_45_64", "pop_65plus"),
style="kmeans",
palette=list("Oranges", "Greens", "Blues", "Purples", "Greys"),
title=c("Population 0 to 14", "Population 15 to 24", "Population 25 to 44",
"Population 45 to 64", "Population 65 and older")) +
tm_shape(NLD_prov) +
tm_borders() +
tm_format("NLD", frame = TRUE, asp=0)
## End(Not run)
# CASE 3: Facets defined by group-by variable(s)
# A group-by variable that divides the objects spatially
tm_shape(NLD_prov) +
tm_polygons("gold2") +
tm_facets(by="name")
## Not run:
tm_shape(NLD_muni) +
tm_borders() +
tm_facets(by="province") +
tm_fill("population", style="kmeans", convert2density = TRUE) +
tm_shape(NLD_prov) +
tm_borders(lwd=4) +
tm_facets(by="name")
## End(Not run)
# The objects are divided by a non-spatial variable (e.g. date/time)
if (require(dplyr) && require(tidyr)) {
metro_long <- metro %>%
gather(year, population, -name, -name_long, -iso_a3, -geometry) %>%
mutate(year = as.integer(substr(year, 4, 7)))
tm_shape(metro_long) +
tm_bubbles("population") +
tm_facets(by = "year")
}
## Not run:
tm_shape(land) +
tm_raster("black") +
tm_facets(by="cover_cls", free.coords = FALSE)
## End(Not run)
# Facets defined by two group-by variables
## Not run:
World$HPI3 <- cut(World$HPI, breaks = c(20, 35, 50, 65),
labels = c("HPI low", "HPI medium", "HPI high"))
World$GDP3 <- cut(World$gdp_cap_est, breaks = c(0, 5000, 20000, Inf),
labels = c("GDP low", "GDP medium", "GDP high"))
tm_shape(World) +
tm_fill("HPI3", palette="Dark2", colorNA="grey90", legend.show = FALSE) +
tm_facets(c("HPI3", "GDP3"), showNA=FALSE, free.coords = FALSE, drop.units = FALSE)
metro_edited <- metro %>%
mutate(pop1950cat = cut(pop1950, breaks=c(0.5, 1, 1.5, 2, 3, 5, 10, 40)*1e6),
pop2020cat = cut(pop2020, breaks=c(0.5, 1, 1.5, 2, 3, 5, 10, 40)*1e6))
tm_shape(World) +
tm_fill() +
tm_shape(metro_edited) +
tm_dots("red", size = .5) +
tm_facets(c("pop1950cat", "pop2020cat"), free.coords = FALSE) +
tm_layout(panel.label.rot = c(0, 90), panel.label.size = 2)
## End(Not run)
# restore current mode
tmap_mode(current.mode)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.