seewave (version 1.6.4)

rmnoise: Remove noise

Description

This function removes background noise by smoothing

Usage

rmnoise(wave, f, output = "matrix", ...)

Value

• A new wave is returned. The class of the returned object is set with the argument output.

Details

This function is based on smooth.spline. You can use the arguments of the later to modify the smoothing.

See Also

afilter, noisew

Examples

# synthesis of a 440 Hz sound with background noise
n <- noisew(d=1,f=8000)
s <- synth(d=1,f=8000,cf=440)
ns <- n+s
# remove noise (but low frequency content still there)
a <- rmnoise(ns,f=8000)