View source: R/class_soundSample.R
sequence | R Documentation |
Take a sound sample and repeat it following given timeline, volume and pan.
sequence(
sample,
time,
letRing = TRUE,
volume = rep(1, NROW(time)),
pan = rep(0, NROW(time)),
nmax = 10 * 10^6
)
sample |
Sound sample object. |
time |
Numeric vector, time (in seconds) at which sample should be repeated |
letRing |
Logical. If TRUE overlapping samples are added; if FALSE, a new sample stops the previous one (=> beware of the click!)) |
volume |
Numeric vector, volume between 0 and 1. |
pan |
Numeric vector, pan between -1 (left) and 1 (right) (0 = centered). |
nmax |
Integer, max number of values for each channel of the resulting Wave. Default value (10*10^6) roughly corresponds to a 150 Mb stereo wave, ~3 min 45s. |
an S4 Wave object (from package tuneR).
# EXAMPLE 1
# Define a sound sample
sam <- soundSample(sin(2*pi*seq(0,1,,44100)*440)+0.1*rnorm(44100)) # 1-second noisy A
# Sequence it
s <- sequence(sam,time=c(0,0.5,0.75),letRing=FALSE,volume=c(0.4,1,1),pan=c(-1,0,1))
# View the result
tuneR::plot(s)
## Not run:
# All calls to function 'tuneR::play' are wrapped in \dontrun{} since
# they rely on an external audio player to play the audio sample.
# See ?tuneR::setWavPlayer for setting a default player.
tuneR::play(s)
## End(Not run)
#' EXAMPLE 2 - make it funkyer
# 2-second sequence based on hi-hat sample
s <- sequence(hiHat,time=seq(0,2,,16),volume=rep(c(1,rep(0.5,3)),4))
# View the result
tuneR::plot(s)
## Not run: tuneR::play(s)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.