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
exportTab(s[[1]], file="spectrum.tab")
## export a list of spectra and use ; as separator
exportCsv(s, path="spectra", sep=";", force=TRUE)
}
Run the code above in your browser using DataLab