powered by
rmnoise(wave, f, Sample = FALSE, ...)
vector
matrix
ts
Sample
Wave
wave
Wave<
TRUE
smooth.spline
afilter
noise
# synthesis of a 440 Hz sound with background noise n <- noise(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)
Run the code above in your browser using DataLab