powered by
peakfind (x, show = TRUE)
data (sound) sound2 = sound$sound[10000:11000] spectrum = spectralslice (sound2, padding = 0, output = TRUE, show = TRUE) peakfind (spectrum[,2])
Run the code above in your browser using DataLab