# NOT RUN {
## load package
library("MALDIquant")
## load example data
data("fiedler2009subset", package="MALDIquant")
## running typical workflow
## transform intensities
spectra <- transformIntensity(fiedler2009subset, method="sqrt")
## smooth spectra
spectra <- smoothIntensity(spectra, method="MovingAverage")
## baseline correction
spectra <- removeBaseline(spectra)
## align spectra
spectra <- alignSpectra(spectra)
# }
Run the code above in your browser using DataLab