stsplot_space | R Documentation |
This is the plot
variant of type=observed~unit
for
"sts"
objects, i.e.,
plot(stsObj, type=observed~unit, ...)
calls the function
documented below. It produces an spplot
where regions are color-coded according to disease incidence
(either absolute counts or relative to population) over a given
time period.
stsplot_space(x, tps = NULL, map = x@map, population = NULL,
main = NULL, labels = FALSE, ...,
at = 10, col.regions = NULL,
colorkey = list(space = "bottom", labels = list(at=at)),
total.args = NULL,
gpar.missing = list(col = "darkgrey", lty = 2, lwd = 2),
sp.layout = NULL,
xlim = bbox(map)[1, ], ylim = bbox(map)[2, ])
x |
an object of class |
tps |
a numeric vector of one or more time points.
The unit-specific sum over all time points |
map |
an object inheriting from |
population |
if
|
main |
a main title for the plot. If |
labels |
determines if and how the regions of the |
... |
further arguments for |
at |
either a number of levels (default: 10) for the categorization
(color-coding) of counts/incidence,
or a numeric vector of specific break points,
or a named list of a number of levels ( |
col.regions |
a vector of fill colors, sufficiently long to serve all levels
(determined by |
colorkey |
a list describing the color key, see
|
total.args |
an optional list of arguments for |
gpar.missing |
list of graphical parameters for
|
sp.layout |
optional list of additional layout items, see |
xlim , ylim |
numeric vectors of length 2 specifying the axis limits. |
a lattice plot of class
"trellis"
, but see
spplot
.
Sebastian Meyer
the central stsplot
-documentation for an overview of
plot types, and animate.sts
for animations of
"sts"
objects.
data("measlesWeserEms")
# default plot: total region-specific counts over all weeks
plot(measlesWeserEms, type = observed ~ unit)
stsplot_space(measlesWeserEms) # the same
# cumulative incidence (per 100'000 inhabitants),
# with region labels and white borders
plot(measlesWeserEms, observed ~ unit,
population = measlesWeserEms@map$POPULATION / 100000,
labels = list(labels = "GEN", cex = 0.7, font = 3),
col = "white", lwd = 2,
sub = "cumulative incidence (per 100'000 inhabitants)")
# incidence in a particular week, manual color breaks, display total
plot(measlesWeserEms, observed ~ unit, tps = 62,
population = measlesWeserEms@map$POPULATION / 100000,
at = c(0, 1, 5),
total.args = list(x = 0, label = "Overall incidence: "))
# if we had only observed a subset of the regions
plot(measlesWeserEms[,5:11], observed ~ unit,
gpar.missing = list(col = "gray", lty = 4))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.