% Ehrenfest % % September 30, 2002 global N; N = input('N = '); T = input('How many steps? '); strt = input('Start at '); results = 1:250; for s=1:250 X = stepp(strt,T); results(s) = X(T+1); end; hist(results,(0:N)+0.5);