One-dimensional cellular automata: Difference between revisions

=={{header|MATLAB}} / {{header|Octave}}==

<lang MATLAB>function one_dim_cell_automata(v,n)

V='_#';

while n>=0;

disp(V(v+1));

n = n-1;

v = filter([1,1,1],1,[0,v,0]);

v = v(3:end)==2;

end;

end</lang>

<pre>octave:27> one_dim_cell_automata('01110110101010100100'=='1',20);

_###_##_#_#_#_#__#__

_#_#####_#_#_#______

__##___##_#_#_______

__##___###_#________

__##___#_##_________

__##____###_________

__##____#_#_________

__##_____#__________

__##________________

__##________________

__##________________

...</pre>