powered by
getLocalMaximumCWT
plotLocalMax(localMax, wCoefs = NULL, range = c(1, nrow(localMax)), colorMap = "RYB", main = NULL, cex = 3, pch = ".", ...)
plot
points
data(exampleMS) scales <- seq(1, 64, 3) wCoefs <- cwt(exampleMS[5000:11000], scales=scales, wavelet='mexh') localMax <- getLocalMaximumCWT(wCoefs) plotLocalMax(localMax)
Run the code above in your browser using DataLab