## load library
library("MALDIquant");
## load example data
data("fiedler2009subset", package="MALDIquant");
## show TIC in spectrum 1
totalIonCurrent(fiedler2009subset[[1]]) ## 90312326
## set TIC to 1 in all spectra
sTIC <- standardizeTotalIonCurrent(fiedler2009subset);
## show TIC in spectrum 1
totalIonCurrent(sTIC[[1]]) ## 1Run the code above in your browser using DataLab