## Not run:
# library(msdata)
# mzdatapath <- system.file("iontrap", package = "msdata")
# mzdatafiles<-list.files(mzdatapath, pattern = "extracted.mzData", recursive = TRUE, full.names = TRUE)
# xs <- xcmsSet(mzdatafiles, method = "MS1")
# ##takes only one file from the file set
# xfrag <- xcmsFragments(xs)
# found<-findMZ(xfrag, 657.3433, 50)
# ## End(Not run)
Run the code above in your browser using DataLab