if (FALSE) {
library("MALDIquant")
library("MALDIquantForeign")
s <- list(createMassSpectrum(mass=1:5, intensity=1:5),
createMassSpectrum(mass=1:5, intensity=1:5))
## export a single spectrum
exportMzMl(s[[1]], file="spectrum.mzML")
## export a list of spectra
exportMzMl(s, path="spectra.mzML")
}
Run the code above in your browser using DataLab