View source: R/stat-wb-sirrad.R
stat_wb_sirrad | R Documentation |
stat_wb_sirrad
computes the mean spectral irradiance under a curve,
yielding energy or photon spectral irradiance. The range(s) of wavelengths to
integrate are set with a list of waveband
objects.
x
-scale transformations and axis flipping are currently not
supported.
stat_wb_sirrad(
mapping = NULL,
data = NULL,
geom = "text",
position = "identity",
...,
w.band = NULL,
time.unit,
unit.in,
label.qty = "mean",
label.mult = 1,
chroma.type = "CMF",
label.fmt = "%.3g",
ypos.mult = 0.55,
xpos.fixed = NULL,
ypos.fixed = NULL,
na.rm = FALSE,
show.legend = NA,
inherit.aes = TRUE
)
stat_wb_e_sirrad(
mapping = NULL,
data = NULL,
geom = "text",
position = "identity",
...,
w.band = NULL,
time.unit = "second",
unit.in = "energy",
label.qty = "mean",
label.mult = 1,
chroma.type = "CMF",
label.fmt = "%.3g",
ypos.mult = 0.55,
xpos.fixed = NULL,
ypos.fixed = NULL,
na.rm = FALSE,
show.legend = NA,
inherit.aes = TRUE
)
stat_wb_q_sirrad(
mapping = NULL,
data = NULL,
geom = "text",
position = "identity",
...,
w.band = NULL,
time.unit = "second",
unit.in = "photon",
label.qty = "mean",
label.mult = 1,
chroma.type = "CMF",
label.fmt = "%.3g",
ypos.mult = 1.07,
xpos.fixed = NULL,
ypos.fixed = NULL,
na.rm = FALSE,
show.legend = NA,
inherit.aes = TRUE
)
mapping |
The aesthetic mapping, usually constructed with
|
data |
A layer specific dataset - only needed if you want to override the plot defaults. |
geom |
The geometric object to use display the data |
position |
The position adjustment to use for overlapping points on this layer |
... |
other arguments passed on to |
w.band |
a waveband object or a list of waveband objects or numeric vector of at least length two. |
time.unit |
character or lubridate::duration |
unit.in |
character One of "photon","quantum" or "energy" |
label.qty |
character |
label.mult |
numeric Scaling factor applied to y-integral values before conversion into character strings. |
chroma.type |
character one of "CMF" (color matching function) or "CC"
(color coordinates) or a |
label.fmt |
character string giving a format definition for converting
y-integral values into character strings by means of function
|
ypos.mult |
numeric Multiplier constant used to scale returned
|
xpos.fixed , ypos.fixed |
numeric If not |
na.rm |
a logical value indicating whether NA values should be stripped before the computation proceeds. |
show.legend |
logical. Should this layer be included in the legends?
|
inherit.aes |
If |
A data frame with one row for each waveband object in the argument
to w.band
. Wavebeand outside the range of the spectral data are
trimmed or discarded.
What it is named integral below is the result of appying irrad
,
e_irrad
or q_irrad
to the data.
yeff multiplied by label.mult
and formatted
according to label.fmt
w.band-midpoint
w.band minimum
w.band maximum
data$y minimum
data$y maximum
weighted irradiance if w.band
describes a BSWF
not weighted irradiance for the range of w.band
yint divided by wl_expanse(w.band)
ypos.fixed or top of data, adjusted by ypos.mult
color of the w.band
label of w.band
black_or_white(wb.color)
Set by the statistic and available to geoms.
..y.label..
..x..
..wb.xmin..
..wb.xmax..
0
..wb.ymean..
..wb.ymean..
..wb.color..
Required by the statistic and need to be set with aes()
.
numeric, wavelength in nanometres
numeric, a spectral quantity
Other stats functions:
stat_color()
,
stat_find_qtys()
,
stat_find_wls()
,
stat_label_peaks()
,
stat_peaks()
,
stat_spikes()
,
stat_wb_box()
,
stat_wb_column()
,
stat_wb_contribution()
,
stat_wb_hbar()
,
stat_wb_irrad()
,
stat_wb_label()
,
stat_wb_mean()
,
stat_wb_relative()
,
stat_wb_total()
,
stat_wl_strip()
,
stat_wl_summary()
library(photobiologyWavebands)
# ggplot() methods for spectral objects set a default mapping for x and y.
ggplot(sun.spct) +
stat_wb_column(w.band = VIS_bands()) +
stat_wb_e_sirrad(w.band = VIS_bands(), angle = 90, size = 4,
label.fmt = "%1.2f", ypos.fixed = 0.1) +
geom_line() +
scale_fill_identity() + scale_color_identity()
ggplot(sun.spct, unit.out = "photon") +
geom_line() +
stat_wb_hbar(w.band = PAR(), size = 1) +
stat_wb_q_sirrad(aes(color = ..wb.color..),
w.band = PAR(), label.fmt = "mean = %.3g",
ypos.mult = 1, xpos.fixed = 390, hjust = 1) +
scale_color_identity()
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.