| geom_lineranges {ordr} | R Documentation |
Intervals depicting ranges, usually about center points
Description
geom_lineranges() renders horizontal and vertical intervals
for a specified subject or variable; geom_pointranges() additionally
renders a point at their crosshairs.
Usage
geom_lineranges(
mapping = NULL,
data = NULL,
stat = "center",
position = "identity",
...,
na.rm = FALSE,
show.legend = NA,
inherit.aes = TRUE
)
geom_pointranges(
mapping = NULL,
data = NULL,
stat = "center",
position = "identity",
...,
na.rm = FALSE,
show.legend = NA,
inherit.aes = TRUE
)
Arguments
mapping |
Set of aesthetic mappings created by |
data |
The data to be displayed in this layer. There are three options: If A A |
stat |
The statistical transformation to use on the data for this
layer, either as a |
position |
Position adjustment, either as a string naming the adjustment
(e.g. |
... |
Additional arguments passed to |
na.rm |
Passed to |
show.legend |
logical. Should this layer be included in the legends?
|
inherit.aes |
If |
Value
A ggproto layer.
Biplot layers
ggbiplot() uses ggplot2::fortify() internally to produce a single data
frame with a .matrix column distinguishing the subjects ("rows") and
variables ("cols"). The stat layers stat_rows() and stat_cols() simply
filter the data frame to one of these two.
The geom layers geom_rows_*() and geom_cols_*() call the corresponding
stat in order to render plot elements for the corresponding factor matrix.
geom_dims_*() selects a default matrix based on common practice, e.g.
points for rows and arrows for columns.
Aesthetics
geom_lineranges() and geom_pointranges() understand the following
aesthetics (required aesthetics are in bold):
-
x -
xmin -
xmax -
y -
ymin -
ymax' -
alpha -
colour -
linewidth -
linetype -
size -
group
See Also
Other geom layers:
geom_axis(),
geom_isoline(),
geom_origin(),
geom_text_radiate(),
geom_unit_circle(),
geom_vector()
Examples
# compute log-ratio analysis of Freestone primary class composition measurements
glass %>%
ordinate(cols = c(SiO2, Al2O3, CaO, FeO, MgO),
model = lra, compositional = TRUE) %>%
confer_inertia("rows") %>%
print() -> glass_lra
# row-principal biplot with ordinate-wise standard deviations
glass_lra %>%
ggbiplot(aes(color = Site), sec.axes = "cols", scale.factor = .05) +
theme_biplot() +
scale_color_brewer(type = "qual", palette = 6) +
geom_cols_text(stat = "chull", aes(label = name), color = "#444444") +
geom_rows_lineranges(fun.data = mean_sdl, linewidth = .75) +
geom_rows_point(alpha = .5) +
ggtitle(
"Row-principal LRA biplot of Freestone glass measurements",
"Ranges 2 sample standard deviations from centroids"
)