facet_nested_wrap_color
behaves similarly to ggh4x::facet_nested_wrap()
in that it wraps a sequence of panels onto a two-dimensional layout, and
nests grouped facets where possible.. The main difference is that it also
allows the user to specify the background and label colors of the individual
facet strips using the colors
and lab_colors
arguments.
facet_nested_wrap_color(
facets,
colors,
nrow = NULL,
ncol = NULL,
scales = "fixed",
axes = "margins",
remove_labels = "none",
shrink = TRUE,
labeller = "label_value",
lab_colors = "auto",
as.table = TRUE,
drop = TRUE,
dir = "h",
strip.position = "top",
nest_line = element_line(inherit.blank = TRUE),
solo_line = FALSE,
resect = unit(0, "mm"),
trim_blank = TRUE,
strip = strip_nested(),
bleed = NULL
)facet_nested_wrap_geo(
facets,
colors = rbind(periods, stages),
nrow = NULL,
ncol = NULL,
scales = "fixed",
axes = "margins",
remove_labels = "none",
shrink = TRUE,
labeller = "label_value",
lab_colors = "auto",
as.table = TRUE,
drop = TRUE,
dir = "h",
strip.position = "top",
nest_line = element_line(inherit.blank = TRUE),
solo_line = FALSE,
resect = unit(0, "mm"),
trim_blank = TRUE,
strip = strip_nested(),
bleed = NULL
)
A set of variables or expressions quoted by vars()
and defining faceting groups on the rows or columns dimension.
The variables can be named (the names are passed to labeller
).
For compatibility with the classic interface, can also be a
formula or character vector. Use either a one sided formula, ~a + b
,
or a character vector, c("a", "b")
.
Specifies which colors to use to replace the strip backgrounds.
Either A) a function that returns a color for a given strip label, B) the
character name of a function that does the same, C) a named character
vector with names matching strip labels and values indicating the desired
colors, or D) a data.frame representing a lookup table with columns named
"name" (matching strip labels) and "color" (indicating desired colors). If
the function returns NA
, the default background color will be used.
Number of rows and columns.
A character(1)
or logical(1)
whether scales are shared
across facets or allowed to vary. One of the following:
"fixed"
or FALSE
Scales are shared across all facets (default).
"free_x"
x-scales are allowed to vary.
"free_y"
y-scales are allowed to vary.
"free"
or TRUE
Both scales can vary
A character(1)
or logical(1)
where axes should be drawn. One
of the following:
"margins"
or FALSE
Only draw axes at the outer margins (default).
"x"
Draw axes at the outer margins and all inner x-axes too.
"y"
Draw axes at the outer margins and all inner y-axes too.
"all"
or TRUE
Draw the axes for every panel.
A character(1)
or logical(1)
determining whether
axis text is displayed at inner panels. One of the following:
"none"
or FALSE
Display axis text at all axes (default).
"x"
Display axis text at outer margins and all inner y-axes.
"y"
Display axis text at outer margins and all inner x-axes.
"all"
or TRUE
Only display axis text at the outer margins.
If TRUE
, will shrink scales to fit output of
statistics, not raw data. If FALSE
, will be range of raw data
before statistical summary.
A function that takes one data frame of labels and
returns a list or data frame of character vectors. Each input
column corresponds to one factor. Thus there will be more than
one with vars(cyl, am)
. Each output
column gets displayed as one separate line in the strip
label. This function should inherit from the "labeller" S3 class
for compatibility with labeller()
. You can use different labeling
functions for different kind of labels, for example use label_parsed()
for
formatting facet labels. label_value()
is used by default,
check it for more details and pointers to other options.
Specifies which colors to use for the strip labels. Either
A) a function that returns a color for a given strip label, B) the
character name of a function that does the same, C) a named character
vector with names matching strip labels and values indicating the desired
colors, D) a data.frame representing a lookup table with columns named
"name" (matching strip labels) and "lab_color" (indicating desired colors),
or E) "auto" (the default), which set the labels to black or white,
whichever has better contrast with the background color, based on
recommendations by the International Telecommunication Union.
If the function returns NA
, the default label color will be used.
If TRUE
, the default, the facets are laid out like
a table with highest values at the bottom-right. If FALSE
, the
facets are laid out like a plot with the highest value at the top-right.
If TRUE
, the default, all factor levels not used in the
data will automatically be dropped. If FALSE
, all factor levels
will be shown, regardless of whether or not they appear in the data.
Direction: either "h"
for horizontal, the default, or "v"
,
for vertical.
By default, the labels are displayed on the top of
the plot. Using strip.position
it is possible to place the labels on
either of the four sides by setting strip.position = c("top",
"bottom", "left", "right")
a theme element, either element_blank()
or inheriting
from ggplot2::element_line()
. Lines are drawn between layers of strips
indicating hierarchy. The element inherits from the
ggh4x.facet.nestline
element in the theme.
A logical(1)
indicating whether parent strips with a
single child should be drawn with a nest_line
(TRUE
) or the line only
applies to parents with multiple children (FALSE
, default). Only relevant
when nest_line
is drawn.
a unit
vector of length 1, indicating how much the
nesting line should be shortened.
A logical(1)
. When TRUE
(default), does not draw rows
and columns containing no panels. When FALSE
, the nrow
and ncol
arguments are taken literally, even when there are more than needed to
fit all panels.
An object created by a call to a strip function, such as
strip_nested()
.
the
bleed
argument has
moved to the strip_nested()
function.
facet_nested_wrap_geo(...)
is an alias of facet_nested_wrap_color()
with the
default of colors
set to rbind(periods, stages)
.
Other faceting functions:
facet_grid_color()
,
facet_nested_color()
,
facet_wrap_color()
library(ggplot2)
df <- data.frame(x = 1:10, y = 1:10,
period = factor(c("Permian", "Triassic", "Jurassic",
"Cretaceous", "Paleogene"),
levels = c("Permian", "Triassic",
"Jurassic", "Cretaceous",
"Paleogene")),
era = factor(c("Paleozoic", "Mesozoic", "Mesozoic",
"Mesozoic", "Cenozoic"),
levels = c("Paleozoic", "Mesozoic",
"Cenozoic")))
ggplot(df, aes(x, y)) +
geom_point() +
facet_nested_wrap_color(~ era + period, colors = rbind(periods, eras))
Run the code above in your browser using DataLab