wdec2bas.m

very good matlab of Monte carlo

%DEC2BAS		Converts a decimal number to a vector of coefficients base r
%
%y = dec2bas(n,r)
%
%n = positive integer to convert
%r = base to convert (1, ... , 9)

function y=wdec2bas(n,r) %Walter's dec2bas

i=1;
y(1)=0;
while n>0
   y(i)=rem(n,r);
   n=floor(n/r);
   i=i+1;
   
end;