powered by
dr_to_wv(omega, tau)
double
vec
x.sim = 1:1000 ntau = floor(log(length(x.sim),2)) tau = 2^(1:ntau) wv.theo = dr_to_wv(1, tau) plot(tau, wv.theo, col = "red")
Run the code above in your browser using DataLab