## Not run:
# library("RforProteomics")
# (f <- getPXD000001mzXML())
# ms <- openMSfile(f)
# x <- xic(ms, mz = 636.925, width = 0.01)
# head(x)
# xic(ms, mz = 636.925, width = 0.01,
# npeaks = 1,
# rtlim = c(2000, 2300))
# ## End(Not run)
Run the code above in your browser using DataLab