2012-01-02 11 views

risposta

8

pacchetto tuneR trovi noise funzione che può generare un oggetto onda che è o bianco o rosa rumore:

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: mi resi conto che il metodo di cui sopra non genera il vettore (doh). modo brutale per convertirlo nel vettore è quello di aggiungere il codice qui sotto:

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 

enter image description here

+4

non è 'p @ left' abbastanza per fare un vettore? (Non riesco a controllare a causa dell'errore CRAN.) – mbq

+0

Sì @mbq 'p @ left' funziona bene! Ottimo suggerimento. –

+0

Solo per interesse, come si scrive una funzione di rumore "a colori" generalizzata, cioè sopprimere le regioni arbitrarie della larghezza di banda? Quello potrebbe essere un divertente progetto di Capodanno per alcuni R-nerd là fuori :-) –