Cách mô phỏng tiếng ồn hồng trong R

Question

Tôi biết rằng nhiễu trắng có thể đạt được bằng cách xử lý đầu ra của rnorm() làm bộ đếm thời gian. Bất kỳ đề xuất về cách mô phỏng tiếng ồn hồng?

Answer 1

Gói tuneR có noise chức năng mà có thể tạo ra một đối tượng sóng đó là một trong hai màu trắng hoặc màu hồng tiếng ồn:

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") 

EDIT: Tôi nhận ra rằng phương pháp trên không tạo ra các vector (DOH). cách tàn bạo để chuyển đổi nó vào vector là thêm đoạn code dưới đây:

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