seewave (version 1.7.6)

fadew: Fade in and fade out of a time wave

Description

This function applies a fade in and/or a fade out to a time wave following a linear, exponential or cosinus-like shape.

Usage

fadew(wave, f, din = 0, dout = 0, shape = "linear", plot = FALSE,
listen = FALSE, output = "matrix", ...)

Arguments

wave

an R object.

f

sampling frequency of wave (in Hz). Does not need to be specified if embedded in wave.

din

fade in duration.

dout

fade out duration.

shape

fade shape, "linear", "exp" for exponential, "cos" for cosinus-like, (by default "linear").

plot

logical, if TRUE returns an oscillographic plot of the wave modified (by default FALSE).

listen

if TRUE the new sound is played back.

output

character string, the class of the object to return, either "matrix", "Wave", "Sample", "audioSample" or "ts".

...

other oscillo graphical parameters.

Value

• If plot is FALSE, a new wave is returned. The class of the returned object is set with the argument output.

See Also

oscillo, addsilw, cutw, deletew,mutew, pastew, revw, zapsilw

Examples

a<-noisew(d=5,f=4000)
op<-par(mfrow=c(3,1))
fadew(a,f=4000,din=1,dout=2,plot=TRUE,title="Linear",cexlab=0.8)
fadew(a,f=4000,din=1,dout=2,shape="exp",plot=TRUE,title="Exponential shape",
    colwave="blue",coltitle="blue",cexlab=0.8)
fadew(a,f=4000,din=1,dout=2,shape="cos",plot=TRUE,title="Cosinus-like shape",
    colwave="red",coltitle="red",cexlab=0.8)
par(op)