Scale y continuous with defaults suitable for raw detector counts.
Usage
scale_y_s.e.irrad_continuous(
unit.exponent = 0,
name = s.e.irrad_label(unit.exponent = unit.exponent, markup.format = markup.format,
time.unit = "second", label.text = label.text, pc.out = pc.out, scaled = scaled,
normalized = normalized, axis.symbols = axis.symbols),
labels = SI_pl_format(exponent = unit.exponent - pc.out * 2),
markup.format = getOption("photobiology.math", default = "R.expression"),
label.text = axis_labels(append = ifelse(axis.symbols, ",", ""))[["s.e.irrad"]],
pc.out = FALSE,
scaled = FALSE,
normalised = FALSE,
normalized = normalised,
axis.symbols = getOption("ggspectra.axis.symbols", default = TRUE),
...
)
scale_y_s.q.irrad_continuous(
unit.exponent = -6,
name = s.q.irrad_label(unit.exponent = unit.exponent, markup.format = markup.format,
time.unit = "second", label.text = label.text, pc.out = pc.out, scaled = scaled,
normalized = normalized, axis.symbols = axis.symbols),
labels = SI_pl_format(exponent = unit.exponent - pc.out * 2),
markup.format = getOption("photobiology.math", default = "R.expression"),
label.text = axis_labels(append = ifelse(axis.symbols, ",", ""))[["s.q.irrad"]],
pc.out = FALSE,
scaled = FALSE,
normalised = FALSE,
normalized = normalised,
axis.symbols = getOption("ggspectra.axis.symbols", default = TRUE),
...
)
scale_y_s.e.irrad_log10(
unit.exponent = 0,
name = s.e.irrad_label(unit.exponent = unit.exponent, markup.format = markup.format,
time.unit = "second", label.text = label.text, pc.out = pc.out, scaled = scaled,
normalized = normalized, axis.symbols = axis.symbols),
labels = SI_pl_format(exponent = unit.exponent - pc.out * 2),
markup.format = getOption("photobiology.math", default = "R.expression"),
label.text = axis_labels(append = ifelse(axis.symbols, ",", ""))[["s.e.irrad"]],
pc.out = FALSE,
scaled = FALSE,
normalised = FALSE,
normalized = normalised,
axis.symbols = getOption("ggspectra.axis.symbols", default = TRUE),
...
)
scale_y_s.q.irrad_log10(
unit.exponent = -6,
name = s.q.irrad_label(unit.exponent = unit.exponent, markup.format = markup.format,
time.unit = "second", label.text = label.text, pc.out = pc.out, scaled = scaled,
normalized = normalized, axis.symbols = axis.symbols),
labels = SI_pl_format(exponent = unit.exponent - pc.out * 2),
markup.format = getOption("photobiology.math", default = "R.expression"),
label.text = axis_labels(append = ifelse(axis.symbols, ",", ""))[["s.q.irrad"]],
pc.out = FALSE,
scaled = FALSE,
normalised = FALSE,
normalized = normalised,
axis.symbols = getOption("ggspectra.axis.symbols", default = TRUE),
...
)
Arguments
- unit.exponent
integer
- name
The name of the scale, used for the axis-label.
- labels
The tick labels or a function to generate them.
- markup.format
character string, "R", "R.expression", "r.character", or "LaTeX".
- label.text
character Textual portion of the labels.
- pc.out
logical, if
TRUE
use percent instead of fraction of one for normalized spectral data.- scaled
logical If
TRUE
relative units are assumed.- normalized, normalised
logical (
FALSE
) or numeric Normalization wavelength in manometers (nm).- axis.symbols
logical If
TRUE
symbols of the quantities are added to the defaultname
.- ...
other named arguments passed to
scale_y_continuous
Note
This function only alters two default arguments, please, see
documentation for scale_continuous
Examples
ggplot(sun.spct, unit.out = "energy") +
geom_line() +
scale_y_s.e.irrad_continuous() +
scale_x_wl_continuous()
ggplot(sun.spct) +
geom_line() +
scale_y_s.e.irrad_continuous(unit.exponent = -3) +
scale_x_wl_continuous()
ggplot(fscale(sun.spct)) +
geom_line() +
scale_y_s.e.irrad_continuous(scaled = TRUE) +
scale_x_wl_continuous()
ggplot(normalize(sun.spct, norm = "max")) +
geom_line() +
scale_y_s.e.irrad_continuous(normalized = "max") +
scale_x_wl_continuous()
my.spct <- normalize(q2e(sun.spct, action = "replace"), norm = "max")
ggplot(my.spct) +
geom_line() +
scale_y_s.e.irrad_continuous(normalized = normalization(my.spct)$norm.type,
pc.out = TRUE) +
scale_x_wl_continuous()
ggplot(my.spct) +
geom_line() +
scale_y_s.e.irrad_continuous(normalized = normalization(my.spct)$norm.wl,
pc.out = TRUE) +
scale_x_wl_continuous()
ggplot(sun.spct) +
geom_line() +
scale_y_s.e.irrad_continuous(axis.symbols = FALSE) +
scale_x_wl_continuous()
ggplot(sun.spct) +
geom_line() +
scale_y_s.e.irrad_continuous(label.text = "") +
scale_x_wl_continuous()
ggplot(sun.spct) +
geom_line() +
scale_y_s.e.irrad_continuous(label.text = "Irradiancia espectral,") +
scale_x_wl_continuous(label.text = "Longitud de onda,")
ggplot(sun.spct) +
geom_line() +
scale_y_s.e.irrad_continuous(unit.exponent = -1) +
scale_x_wl_continuous()
ggplot(sun.spct, unit.out = "photon") +
geom_line() +
scale_y_s.q.irrad_continuous() +
scale_x_wl_continuous()
ggplot(clip_wl(sun.spct, c(295, NA))) +
geom_line() +
scale_y_s.e.irrad_log10() +
scale_x_wl_continuous()
ggplot(clip_wl(sun.spct, c(295, NA)),
unit.out = "photon") +
geom_line(na.rm = TRUE) +
scale_y_s.q.irrad_log10() +
scale_x_wl_continuous()