data <- generateImage(as="MSImageSet")
batchProcess(data, normalize=TRUE, smoothSignal=TRUE,
reduceBaseline=TRUE, peakPick=TRUE,
layout=c(2,2), plot=interactive())
batchProcess(data, normalize=TRUE,
reduceBaseline=list(blocks=200), peakPick=list(SNR=12),
layout=c(1,3), plot=interactive())
Run the code above in your browser using DataLab