元胞自动机与实践

整理了关于元胞自动机的一些资料。包含对于元胞自动机的介绍，分析，及大量matlab以供参考，对于初学或有一定了解的人都具有一定意义。也可以用于数学建模之中，作为一种思考问题的方法。

%Conway‘s life with GUI

clf
clear all

%=============================================
%build the GUI
%define the plot button
plotbutton=uicontrol（‘style‘‘pushbutton‘...
   ‘string‘‘Run‘ ...
   ‘fontsize‘12 ...
   ‘position‘[1004005020] ...
   ‘callback‘ ‘run=1;‘）;

%define the stop button
erasebutton=uicontrol（‘style‘‘pushbutton‘...
   ‘string‘‘Stop‘ ...
   ‘fontsize‘12 ...
   ‘position‘[2004005020] ...
   ‘callback‘‘freeze=1;‘）;

%define the Quit button
quitbutton=uicontrol（‘style‘‘pushbutton‘...
   ‘string‘‘Quit‘ ...
   ‘fontsize‘12 ...
   ‘position‘[3004005020] ...
   ‘callback‘‘stop=1;close;‘）;

number = uicontrol（‘style‘‘text‘ ...
    ‘string‘‘1‘ ...
   ‘fontsize‘12 ...
   ‘position‘[204005020]）;
    

%=============================================
%CA setup

n=128;

%initialize the arrays
z = zeros（nn）;
cells = z;
sum = z;
%set a few cells to one
cells（n/2.25*n:.75*n） = 1;
cells（.25*n:.75*nn/2） = 1;

%cells（.5*n-1.5*n-1）=1;
%cells（.5*n-2.5*n-2）=1;
%cells（.5*n-3.5*n-3）=1;
cells = （rand（nn））<.5 ;
%how long for each case to stability or simple oscillators

%build an image and display it
imh = image（cat（3cellszz））;
set（imh ‘erasemode‘ ‘none‘）
axis equal
axis tight

%index definition for cell update
x = 2:n-1;
y = 2:n-1;

%Main event loop
stop= 0; %wait for a quit button push
run = 0; %wait for a draw 
freeze = 0; %wait for a freeze

while （stop==0） 
    
    if （run==1）
        %nearest neighbor sum
        sum（xy） = cells（xy-1） + cells（xy+1） + ...
            cells（x-1 y） + cells（x+1y） + ...
            cells（x-1y-1） + cells（x-1y+1） + ...
            cells（3:ny-1） + cells（x+1y+1）;
        % The CA rule
        cells = （sum==3） | （sum==2 & cells）;       
        %draw the new image
        set（imh ‘cdata‘ cat（3cellszz） ）
        %update the step number diaplay
        stepnumber = 1 + str2num（get（number‘string‘））;
        set（number‘string‘num2str（stepnumber））
    end
    
    if （freeze==1）
        run = 0;
        freeze = 0;
    end
    
    drawnow  %need this in the loop for controls to work
    
end
    
    

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----
     目录           0  2018-01-31 17:03  元胞自动机\
     目录           0  2018-01-21 15:06  元胞自动机\1月13日课件（元胞自动机）\
     文件      283389  2009-01-12 23:17  元胞自动机\1月13日课件（元胞自动机）\元胞自动机在数学模型中的应用.pdf
     目录           0  2018-01-21 15:06  元胞自动机\1月13日课件（元胞自动机）\程序\
     目录           0  2018-01-21 15:06  元胞自动机\1月13日课件（元胞自动机）\程序\The Booth Tolls for Thee\
     文件        1478  2008-01-23 21:01  元胞自动机\1月13日课件（元胞自动机）\程序\The Booth Tolls for Thee\cellular.m
     文件         135  2007-12-23 12:27  元胞自动机\1月13日课件（元胞自动机）\程序\The Booth Tolls for Thee\clear_boundary.m
     文件         126  2007-12-23 12:27  元胞自动机\1月13日课件（元胞自动机）\程序\The Booth Tolls for Thee\compute_output.m
     文件         137  2007-12-23 12:25  元胞自动机\1月13日课件（元胞自动机）\程序\The Booth Tolls for Thee\compute_wait.m
     文件         521  2008-01-23 20:30  元胞自动机\1月13日课件（元胞自动机）\程序\The Booth Tolls for Thee\create_entry.m
     文件         939  2007-12-23 12:26  元胞自动机\1月13日课件（元胞自动机）\程序\The Booth Tolls for Thee\create_plaza.m
     文件        1215  2007-12-28 07:55  元胞自动机\1月13日课件（元胞自动机）\程序\The Booth Tolls for Thee\move_forward.m
     文件         259  2008-01-23 20:20  元胞自动机\1月13日课件（元胞自动机）\程序\The Booth Tolls for Thee\new_cars.m
     文件        1107  2007-12-28 08:00  元胞自动机\1月13日课件（元胞自动机）\程序\The Booth Tolls for Thee\switch_lanes.asv
     文件        1106  2007-12-28 08:00  元胞自动机\1月13日课件（元胞自动机）\程序\The Booth Tolls for Thee\switch_lanes.m
     文件          17  2009-01-13 20:30  元胞自动机\1月13日课件（元胞自动机）\程序\The Booth Tolls for Thee\说明.txt
     文件        2226  2007-12-26 16:10  元胞自动机\1月13日课件（元胞自动机）\程序\calife.m
     文件         860  2012-02-09 11:16  元胞自动机\1月13日课件（元胞自动机）\程序\forest.asv
     文件         965  2012-02-09 14:10  元胞自动机\1月13日课件（元胞自动机）\程序\forest.m
     目录           0  2018-01-21 15:06  元胞自动机\1月13日课件（元胞自动机）\程序\新建文件夹\
     目录           0  2018-01-21 15:06  元胞自动机\1月13日课件（元胞自动机）\程序\新建文件夹\HMCMCM\
     文件       69334  2012-02-09 08:36  元胞自动机\1月13日课件（元胞自动机）\程序\新建文件夹\HMCMCM\blank-template.pdf
     文件       57740  2012-02-09 08:36  元胞自动机\1月13日课件（元胞自动机）\程序\新建文件夹\HMCMCM\blank-template.synctex
     文件        6839  2012-02-09 08:26  元胞自动机\1月13日课件（元胞自动机）\程序\新建文件夹\HMCMCM\blank-template.tex
     文件      282182  2012-02-09 08:37  元胞自动机\1月13日课件（元胞自动机）\程序\新建文件夹\HMCMCM\icmmcm-sample.pdf
     文件     1032110  2012-02-09 08:37  元胞自动机\1月13日课件（元胞自动机）\程序\新建文件夹\HMCMCM\icmmcm-sample.synctex
     文件       61966  2012-02-09 08:26  元胞自动机\1月13日课件（元胞自动机）\程序\新建文件夹\HMCMCM\icmmcm-sample.tex
     文件        5346  2012-02-09 08:27  元胞自动机\1月13日课件（元胞自动机）\程序\新建文件夹\HMCMCM\icmmcm.bib
     文件        3870  2012-02-09 08:27  元胞自动机\1月13日课件（元胞自动机）\程序\新建文件夹\HMCMCM\icmmcm.cls
     文件         996  2012-02-09 08:27  元胞自动机\1月13日课件（元胞自动机）\程序\新建文件夹\HMCMCM\shapes.pdf
     文件       11174  2012-02-09 08:27  元胞自动机\1月13日课件（元胞自动机）\程序\新建文件夹\HMCMCM\shapes.ps
............此处省略23个文件信息