plot.peaklist function does not allow to overwrite title and y- n xlabels

[jjGG]

plot.peaklist <- function (x, y, ...) { plot(x$mZ, x$intensity, type = "h", main = x$title, xlab = "m/Z", ylab = "intensity", ...) }

========= main, xlab, ylab is hard coded!! please make it flexible ;)

should be assigned to cp