With the tmap package, thematic maps can be generated with great flexibility. The syntax for creating plots is similar to that of ggplot2
. Also, the standard work flow that is needed to create a thematic map is embedded in tmap; convenient functions for reading and writing ESRI shape files, setting the proper projection, and appending data are contained in the tmap package.
We refer to shape objects as objects from the class Spatial
or Raster
, respectively from the sp
and the raster
package. The six supported subclasses are:
Without data | With data | |
---|---|---|
Polygons | SpatialPolygons | SpatialPolygonsDataFrame |
Points | SpatialPoints | SpatialPointsDataFrame |
Lines | SpatialLines | SpatialLinesDataFrame |
Raster | SpatialGrid | SpatialGridDataFrame |
Raster | SpatialPixels | SpatialPixelsDataFrame |
Raster | RasterLayer | |
Raster | RasterBrick | |
Raster | RasterStack |
Obviously, shape objects with data (the right-hand side column) are recommended, since data is what we want to show.
Load shape object of Europe (contained in this package):
data(Europe)
Shape objects in ESRI format can be read with read_shape
and written with write_shape
. Projection can be get and set with get_projection
and set_projection
respectively. Note: projections can also directly (and temporarily) be set in the plotting method (as argument of tm_shape
, see below).
The plotting syntax is based on that of ggplot
. The qtm
function is tmap
's equivalent to ggplot2
's qplot
. The first, and only required argument is a shape object:
qtm(Europe)
So, by default, the polygons (in case the shape object is a SpatialPolygonsDataFrame) are filled with light grey, and the polygon borders are drawn in dark grey.
A choropleth is created with the following code:
qtm(Europe, fill="gdp_cap_est", text="iso_a3", text.size="AREA", root=5, fill.title="GDP per capita",
fill.textNA="Non-European countries", theme="Europe")
In this code, fill
and text
serve as aesthetics. Both gdp_cap_est
and iso_a3
are variables of the data contained in the shape object Europe
. A color palette, in this case the qualitative palette from yellow to green, is mapped to the values of gdp_cap_est
. The variable iso_a3
contains the text labels, in this case the country codes.
The arguments text.size
and root
determine the fontsizes of the text labels (in this case, the fifth root of the area sizes are taken). The fill.title
argument is the title for the fill
-legend. The argument fill.textNA
is the legend text for missing values. The theme
argument specifies predefined layout settings for this shape object.
The function qtm
offers the same flexibility as the main plotting method (to be described next). However, for more complex plots, the main plotting method is recommended for tis readability.
The main plotting method, the equivalent to ggplot2
's ggplot
, consists of elements that start with tm_
. The first element to start with is tm_shape
, which specifies the shape object. Next, one, or a combination of the following drawing layers should be specified:
Drawing layer | Description | Main arguments |
---|---|---|
tm_fill |
Fills the polygons | col* |
tm_borders |
Draws polygon borders | col, lwd |
tm_bubbles |
Draws bubbles | size*, col* |
tm_lines |
Draws polylines | col*, lwd* |
tm_lines |
Draws a raster | col* |
tm_text |
Add text labels | text+, size+ |
tm_grid |
Add coordinate grid lines | |
tm_credits |
Add credits text label | |
tm_scale_bar |
Add scale bar |
The arguments with superscript symbols can be used as aesthetics. Both constant values as well as data variable names can be assigned to these arguments. For instance, tm_fill(col="blue")
colors all polygons blue, while tm_fill(col="var1")
, where "var1"
is the name of a data variable in the shape object, creates a choropleth. Only for the five arguments with a *, a legend is created (and by default shown).
The last plot is reproduced as follows:
tm_shape(Europe) +
tm_fill("gdp_cap_est", textNA="Non-European countries", title="GDP per capita") +
tm_borders() +
tm_text("iso_a3", size="AREA", root=5) +
tm_layout_Europe()
We refer to tm_shape
and its subsequent drawing layers (all of the elements in the last example except tm_layout
) as a group. Multiple groups can be stacked. To illustrate this, let's create a complex map of Europe:
data(rivers)
data(metro)
tm_shape(Europe) +
tm_fill("pop_est_dens", style="kmeans", textNA="Non-European countries",
title="Country population density (per km2)") +
tm_borders() +
tm_shape(rivers) +
tm_lines("dodgerblue3") +
tm_shape(metro) +
tm_text("name", size="pop2010", scale=1, ymod=-.02, root=4, size.lowerbound = .60,
bg.color="yellow", bg.alpha = .5) +
tm_bubbles("pop2010", "red", border.col = "black", border.lwd=1, size.lim = c(0, 11e6),
sizes.legend = seq(2e6,10e6, by=2e6), title.size="Metropolitan Population") +
tm_shape(Europe) +
tm_text("iso_a3", size="area", scale=1.5, root=8, size.lowerbound = .40,
fontface="bold", case=NA, fontcolor = "gray35") +
tm_layout_Europe("Map of Europe")
Things to learn from this code:
tm_shape
. Notice that the rivers shape object also contains rivers outside Europe: see tm_shape(rivers) + tm_lines("dodgerblue3")
. Use tm_shape
's is.master
argument take the projection and covered area from other shape objects.tm_layout
controls all layout options such as fonts, legends, and margins. The element tm_layout_Europe
is a wrapper function with some other defaults that are tailored for Europe: for instance, the left inner margin is increased to make space for the legend.Small multiples are generated in two ways:
tm_shape(Europe) +
tm_fill(c("pop_est_dens", "gdp_cap_est"), style="kmeans",
title=c("Population density", "GDP per capita")) +
tm_layout_Europe()
tm_facets
:tm_shape(Europe) +
tm_fill("gdp_cap_est", style="kmeans", title="GDP per capita") +
tm_facets("part") +
tm_layout_Europe()
The scales of each aesthetic argument can be set to either fixed or free, and also, the coordinate ranges of the small multiples:
tm_shape(Europe[Europe$continent=="Europe",]) +
tm_fill("part", thres.poly = 0) +
tm_facets("name", free.coords=TRUE, drop.shapes=TRUE) +
tm_layout(legend.show = FALSE, title.position = c("center", "center"), title.size = 2)
Remarks: the argument drop.shapes
is used to drop all non-selected shapes. If drop.shapes=FALSE
then neighboring countries are also visible. The argument thres.poly
is set to 0 in order to calculate the aesthetics for all polygons, so also for very small ones, like Vatican.
The layout of the thematic map can be changed with tm_layout
, for instance regarding the legend:
data(land)
data(World)
pal8 <- c("#33A02C", "#B2DF8A", "#FDBF6F", "#1F78B4", "#999999", "#E31A1C", "#E6E6E6", "#A6CEE3")
tm_shape(land, ylim = c(-88,88), relative=FALSE) +
tm_raster("cover_cls", palette = pal8, title="Global Land Cover", legend.hist=TRUE, legend.hist.z=0) +
tm_shape(World) +
tm_borders() +
tm_layout_World(inner.margins=0,
legend.text.size=1,
legend.title.size=1.2,
legend.position = c("left","bottom"),
legend.bg.color = "white", legend.bg.alpha=.2,
legend.frame="gray50",
legend.width=.2, legend.height=.6,
legend.hist.height=.2,
legend.hist.bg.color="gray60", legend.hist.bg.alpha=.5)
Also, the outer and inner margins as well as the aspect ratio are determined with tm_layout
:
(tm <- tm_shape(World) +
tm_fill() +
tm_borders() +
tm_layout(bg.color = "lightblue", outer.margins=c(.05,0,.05,0),
inner.margins=c(0,0,.02,0), asp=0))
The behaviour of outer.margins
, inner.margins
, and asp
are correlated. To see the viewports that these arguments determine, the design mode can be enabled:
tm + tm_layout(design.mode=TRUE)
## aspect ratio device (yellow): 1.428571
## aspect ratio frame (blue): 1.587302
## aspect ratio master shape, World (red): 1.979637
The red rectangle is the bounding box of the shape object. Both inner.margins
and asp
determine the measurements of the frame, indicated by the blue rectagle. Setting the left inner margin is useful to have extra space for the legend. Setting the aspect ratio is handy when the plot is saved to an image with a specific resolution. For instance, to save a thematic World map as a png image of 1920 by 1080 pixels, the setting outer.margins=0, asp=1920/1080
is recommended. When asp=0
, as in the example above, the aspect ratio of the device (given the outer margins) is taken.
Besides the ggplot2
-style plotting functions, the package also offers functions to set up a work flow that is sufficient for most statistical applications.
Loading and preprocessing shape objects:
read_shape
and write_shape
;get_projection
and set_projection
;append_data
;approx_areas
and calc_densities
.split
and sbind
get_IDs
.Plotting shape objects:
qtm
, Saving the output for publication and presentation:
pdf("my_map.pdf", width=10, height=6)
tm_shape(Europe) +
tm_fill("gdp_cap_est", textNA="Non-European countries", title="GDP per capita") +
tm_borders() +
tm_text("iso_a3", size="AREA", root=5)
dev.off()
The scale
argument in tm_layout
is very useful as overall scalar (comparable to the scale
argument in ggplot2
's ggsave
).
animation_tmap
:animation_tmap({
tm_shape(Europe) +
tm_fill("yellow") +
tm_borders() +
tm_facets(by = "name", nrow=1,ncol=1)
}, width=1200, height=800, filename="my_animation.gif")
Notice that, in order to create a series of plots where one map is shown at a time, both nrow
and ncol
are set to 1 in tm_facets
.
tm_shape(Europe[Europe$name=="Austria", ]) +
tm_polygons()
data(World)
rivers$constant <- factor("Rivers")
tm_shape(World) +
tm_fill() +
tm_shape(rivers) +
tm_lines(col="constant", palette="dodgerblue3", title.col="World map") +
tm_layout_World()
Each drawing element has a scalar arguemnt called scale
. The overall scaling and font sizes can be set by the scale
argument in tm_layout
.
When the element tm_grid
is added to the plot, grid lines are plotted.