dec2bi.m

一个利用元胞自动机进行生态仿真的matlab程序

function bin=dec2bi(dec)
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%  ENCODE: Ruturn the binary number corresponding 
%                decimal number
%
%	Fist Coded			3  June		1998
%	Last Modefied		4  June		1998
%
%	Copyright (c)
%	T. Suzudo JAERI-CAIL
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% bin     	 : binary number
% dec     :rule number

% this function returns binary number by character form such as '1010'
a=dec2bin(dec);
for ii=1:size(a,2)
	bin(ii)=str2num(a(ii));
end