Remove the amplitude modulations of a time wave
This functions removes the amplitude modulation of a time wave through the Hilbert amplitude envelope.
rmam(wave, f, channel = 1, plot = FALSE, listen = FALSE, output = "matrix", ...)
wave |
an R object. |
f |
sampling frequency of |
channel |
channel of the R object, by default left channel (1). |
plot |
logical, if |
listen |
if |
output |
character string, the class of the object to return, either
|
... |
other |
The new time wave is obtained by dividing the original time wave by its Hilbert amplitude envelope.
If plot is FALSE, a new wave is returned. The class
of the returned object is set with the argument output.
Jerome Sueur sueur@mnhn.fr
Mbu Nyamsi, R. G., Aubin, T. & Bremond, J. C. 1994 On the extraction of some time dependent parameters of an acoustic signal by means of the analytic signal concept. Its application to animal sound study. Bioacoustics, 5: 187-203.
# generate a new sound with amplitude modulation a<-synth(f=8000, d=1, cf=1500, am=c(50,10)) # remove the amplitude modulation and plot the result rmam(a,f=8000,plot=TRUE)
Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.