ftirplot {cryst} | R Documentation |
Produces a graph of the crystalline area of a FTIR spectrum of starch and the Gauss curve.
ftirplot(spectrum, gauss, lim = c(1190, 1160, 985, 950))
spectrum |
matrix. The matrix of FTIR spectrum baseline-corrected by drawing a tangentline in the 800-1300 cm-1 region. The first row corresponds to wavelength; the second row corresponds to intensity. |
gauss |
matrix. The matrix of Gauss curve (gaussian holocrystalline-peak). |
lim |
vector. Regions of the FTIR spectrum comprising the fixing points of the Gauss curve. |
Claudio Pozo Valenzuela [aut, cre] and Saddys Rodriguez-llamazares [aut]
# Convert data frame to matrix, select A-type starch
spectrum <- as.matrix(t(FTIR[, c('wavelength','A')]))
# List of crystallinity components
crs <- fitFTIRc(spectrum = spectrum, mu = 1180, sigma = 60, k = 1, lim = c(1190, 1160, 985, 955))
# Original matrix
original <- crs$original
# Gaussian curve fit
gauss <- crs$gauss
# Plots the crystalline area of a FTIR spectrum
ftirplot(spectrum=original, gauss=gauss, lim=c(1190, 1160, 985, 950))