Repeat a time wave

Share:

Description

This function repeats a time wave

Usage

1
repw(wave, f, times = 2, join = FALSE, plot = 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.

times

a numeric of length 1 describing the number of times the wave has to be repeated.

join

if TRUE the last point of wave will be removed for smoothing junction between repetitions. See examples.

plot

logical, if TRUE plots the repeated time wave.

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.

Author(s)

Jerome Sueur sueur@mnhn.fr

See Also

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

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
data(tico)
repw(tico,f=22050,plot=TRUE)
# use 'join' for smooth pasting
par(mfrow=c(2,1))
a <- synth(cf=50, f=400, d=0.1)
repw(a, f=400, plot=TRUE)
title(main="join is FALSE")
points(x=0.1, y=0, cex=2, col=2)
repw(a, f=400, join=TRUE, plot=TRUE)
title(main="join is TRUE")
points(x=0.1, y=0, cex=2, col=2)

Want to suggest features or report bugs for rdrr.io? Use the GitHub issue tracker.