repw: Repeat a time wave

In seewave: Sound Analysis and Synthesis

Repeat a time wave

Description

This function repeats a time wave

Usage

repw(wave, f, channel = 1, 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.
channel	channel of the R object, by default left channel (1).
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 [e-mail]

See Also

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

Examples

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)

seewave documentation built on Oct. 19, 2023, 5:07 p.m.