如何模拟R中的粉红噪声

Question

我知道通过将输出rnorm()视为时间序列可以实现白噪声.有关如何模拟粉红噪音的任何建议？

Answer 1

包tuneR具有noise可以生成白色或粉红色噪声的波形对象的功能:

require(tuneR)
w <- noise(kind = c("white"))
p <- noise(kind = c("pink"))
par(mfrow=c(2,1))
plot(w,main="white noise")
plot(p,main="pink noise")

编辑:我意识到上面的方法不生成向量(doh).将其转换为向量的残酷方法是添加以下代码:

writeWave(p,"p.wav")#writes pink noise on your hard drive
require(audio)#loads `audio` package to use `load.wave` function
p.vec <- load.wave("path/to/p.wav")#this will load pink noise as a vector