http://www.walkingrandomly.com/?p=19

I've been trying to find a way to graph this function without buying Mathematica but I haven't found a way. It might be possible with the free online Wolfram Alpha but I haven't succeeded with setting $0<z<0.001$. Any recommendations on how I might be able to get the wished result would be great, with any available program.