plotSpectra | R Documentation |
Plots the spectra stored in a Spectra
object. Spectra may be plotted
offset or stacked. The vertical scale is controlled by a combination of
several parameters.
plotSpectra(
spectra,
which = c(1),
yrange = range(spectra$data),
offset = 0,
amplify = 1,
lab.pos = mean(spectra$freq),
showGrid = TRUE,
leg.loc = "none",
...
)
spectra |
An object of S3 class |
which |
An integer vector specifying which spectra to plot, and the order. |
yrange |
A vector giving the limits of the y axis desired, for instance
|
offset |
A number specifying the vertical offset between spectra if more than one is plotted. Set to 0.0 to overlay the spectra. |
amplify |
A number specifying an amplification factor to be applied to all spectra. Useful for magnifying spectra so small features show up (though large peaks will then be clipped, unless you zoom on the x axis). |
lab.pos |
A number (in frequency units) giving the location of a label for each spectrum.
Generally, pick an area that is clear in all spectra plotted. If no label
is desired, set |
showGrid |
Logical. Places light gray vertical lines at each tick mark
if |
leg.loc |
Either a list with elements |
... |
Parameters to be passed to the plotting routines. Applies to base graphics only. |
The returned value depends on the graphics option selected (see ChemoSpecUtils::GraphicsOptions()
).
base
: None. Side effect is a plot.
ggplot2
: The plot is displayed, and a ggplot2
object is returned if the value is assigned. The plot can be modified in the usual ggplot2
manner.
Bryan A. Hanson (DePauw University), Tejasvi Gupta.
plotSpectraJS
for the interactive version. See ChemoSpecUtils::GraphicsOptions()
for more information about the graphics options. Additional documentation at
https://bryanhanson.github.io/ChemoSpec/
# This example assumes the graphics output is set to ggplot2 (see ?GraphicsOptions).
library("ggplot2")
data(metMUD1)
p1 <- plotSpectra(metMUD1, which = c(10, 11), yrange = c(0, 1.5),
offset = 0.06, amplify = 10, lab.pos = 0.5)
p1 <- p1 + ggtitle("metMUD1 NMR Data")
p1
# Add a legend at x, y coords
p2 <- plotSpectra(metMUD1, which = c(10, 11), yrange = c(0, 1.5),
offset = 0.06, amplify = 10, lab.pos = 0.5, leg.loc = list(x = 0.8, y = 0.8))
p2 <- p2 + ggtitle("metMUD1 NMR Data")
p2
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.