powered by
rwiener
end
rwiener(end = 1, frequency = 1000)
# simulate a Wiener process on [0,1] and plot it x <- rwiener() plot(x,type="l")
Run the code above in your browser using DataLab