m=12000;
o=floor(4*rand(m,1));
z=i.^o;
d=[real(z) imag(z)];
xy=cumsum(d);
plot3(1:m,xy(:,1),xy(:,2)) 
set(gca,'PlotBoxAspectRatio',[0.1,1,1],'ygrid','on','zgrid','on')
view(80,30)
print -dpng dogwalking

comet(xy(:,1),xy(:,2))