# NOT RUN {
library(cliqueMS)
mzfile <- system.file("standards.mzXML", package = "cliqueMS")
rawMS <- MSnbase::readMSData(files = mzfile, mode = "onDisk")
cpw <- xcms::CentWaveParam(ppm = 15, peakwidth = c(5,20), snthresh = 10)
msnExp <- xcms::findChromPeaks(rawMS, cpw)
ex.anClique <- createanClique.XCMSnExp(msnExp)
summary(ex.anClique)
# }
Run the code above in your browser using DataLab