## plot the waveform and power of a given sound.
data (sound)
# sound = loadsound() ## run this line to use you own sound
## compare waveform and power
par (mfrow = c(2,1), mar = c(4,4,1,1));
plot (sound)
powertrack (sound)
Run the code above in your browser using DataLab