fGaussianConvol: fGaussianConvol

In tommasojulitta/FieldSpectroscopyDP: R package for processing fieldspectroscopy data

Description

Function to compute the gaussian convolution on a specific spectral range

Usage

fGaussianConvol(Wl = Wl, Ref = Ref, CWl = CWl, FWHM = FWHM)

Arguments

Wl	numeric array: wavelenghts spectrometer to be deconvolved
Ref	numeric array: Reflectance
CWl	scalar: Central Wavelength
FWHM	scalar: Full-Width at Half Maximum of the central Wavelength

Value

numeric value of the gaussian convolution

Author(s)

Tommaso Julitta, Mirco Migliavacca, Thomas Wutzler

Examples

data("reflOO")


# Select starting wavelenght


CWl<-600


# Select last wavelenght


FWHM<-8


#apply the convolution on the spectra at the defined spectal range


res<-fGaussianConvol(Wl=reflOO$Wl, Ref=reflOO$Ref, CWl=CWl, FWHM=FWHM)


#Plot results


plot(reflOO$Wl, reflOO$Ref, ylim=c(0,0.7),xlim=c(400,900), type="l",xlab = "Wl [nm]", ylab= "Reflectance [-]")


points(CWl, res, col="red")


legend("topleft",col=c("red"),pch=1,cex=1.2,legend=c("convolved value"),box.col="white")


box()

tommasojulitta/FieldSpectroscopyDP documentation built on March 12, 2020, 1:42 p.m.