timer {seewave} | R Documentation |
This function computes and shows the duration of signal periods, pause periods and their ratio.
timer(wave, f, threshold = 5, envt="abs", power = 1, msmooth = NULL, ksmooth = NULL, plot = TRUE, plotthreshold = TRUE, col = "black", colval = "red", xlab = "Time (s)", ylab = "Amplitude", ...)
wave |
an R object. |
f |
sampling frequency of wave (in Hz). Does not need to be specified if embedded in wave . |
threshold |
amplitude threshold for signal detection (in %). |
envt |
the type of envelope to be used: either "abs" for absolute
amplitude envelope or "hil" for Hilbert amplitude envelope. See env . |
power |
a power factor applied to the amplitude
envelope. Increasing power will reduce low amplitude
modulations and increase high amplide modulations. This can be used
to reduce background noise (by default equals to 1, i.e. no change. |
msmooth |
a vector of length 2 to smooth the amplitude envelope with a
mean sliding window. The first component is the window length
(in number of points). The second component is the overlap between
successive windows (in %). See env . |
ksmooth |
kernel smooth for the amplitude enveloppe via kernel . See env . |
plot |
logical, if TRUE plots the envelope and the measurements
(by default TRUE ). |
plotthreshold |
logical, if TRUE plots the threshold
as an horizontal line on the graph (by default TRUE ). |
col |
colour of the envelope. |
colval |
colour of plotted measurements. |
xlab |
title of the x-axis. |
ylab |
title of the y-axis. |
... |
other plot graphical parameters. |
If plot
is FALSE
, timer
returns a list containing three
components:
s |
duration of signal periods in seconds |
p |
duration of pause periods in seconds |
r |
ratio between the signal periods and silence |
.
Jerome Sueur sueur@mnhn.fr
data(tico) timer(tico,f=22050,threshold=5,msmooth=c(50,0)) # to compare with an oscillographic representation data(orni) op<-par(mfrow=c(2,1)) timer(orni,f=22050,threshold=5,msmooth=c(40,0),tck=0.05, bty="l",colval="blue") title(main="A cicada song made of five echemes",col="blue") oscillo(orni,f=22050,k=1,j=1) par(op)