data(isotopes)
data(chemforms)
pattern<-isopattern(
isotopes,
chemforms,
threshold=0.1,
plotit=TRUE,
charge=FALSE,
emass=0.00054858,
algo=1
)
check_several(pattern,dmz=0.001,ppm=FALSE)
Run the code above in your browser using DataLab