## load library
library("MALDIquant");
## load example data
data("fiedler2009subset", package="MALDIquant");
## choose only the first mass spectrum
s <- fiedler2009subset[[1]];
## transform spectrum
t <- transformIntensity(s, fun=sqrt);
## plot spectrum
par(mfrow=c(2, 1));
plot(s, main="raw spectrum");
plot(t, main="transformed spectrum");
par(mfrow=c(1, 1));Run the code above in your browser using DataLab