## load library
library("MALDIquant");
## create list
p <- list();
## test list
isMassPeaksList(p); # returns FALSE
## create two MassPeaks objects and add them to the list
p <- createMassPeaks(mass=1:100, intensity=1:100,
metaData=list(name="example 1"));
p <- createMassPeaks(mass=1:100, intensity=1:100,
metaData=list(name="example 2"));
## test list
isMassObjectList(p); # returns TRUE
isMassPeaksList(p); # returns TRUE
isMassSpectrumList(p); # returns FALSERun the code above in your browser using DataLab