more off;
i=0;
data = rand (1e5, 1);
h = plot (data);

do
 i += 1;
 if (mod (i,100) == 0)
   disp (i);
 endif

 #clf
 #cla
 set (h, "ydata", rand (1e5, 1));
 drawnow;

until (i > 5e3)
