元胞自动机的简单应用

% 定义元胞自动机的规则函数
function new_state = rule(old_state, neighbors)
    % 元胞状态更新规则，这里采用了Conway生命游戏的规则
    n_neighbors = sum(neighbors(:)) - old_state; % 计算邻居元胞中的活着的个数
    if old_state == 1
        if n_neighbors < 2 || n_neighbors > 3
            new_state = 0; % 如果元胞状态为1且邻居元胞中的活着的个数不为2或3，则状态变为0
        else
            new_state = 1; % 否则保持不变
        end
    else
        if n_neighbors == 3
            new_state = 1; % 如果元胞状态为0且邻居元胞中的活着的个数为3，则状态变为1
        else
            new_state = 0; % 否则保持不变
        end
    end
end

% 定义元胞自动机的初始状态
init_state = randi([0 1], 100, 100); % 生成一个100*100的二维随机矩阵

% 运行元胞自动机，演化100代
for i = 1:100
    subplot(10, 10, i); % 使用subplot函数可视化元胞自动机的演化过程
    imagesc(init_state); % 绘制热图
    colormap(gray);
    title(['Generation: ', num2str(i)]);
    axis off;
    new_state = zeros(size(init_state)); % 创建新的状态矩阵
    for j = 1:size(init_state, 1)
        for k = 1:size(init_state, 2)
            % 对每个元胞应用规则函数更新状态
            neighbors = init_state(max(j-1, 1):min(j+1, size(init_state,1)), max(k-1, 1):min(k+1, size(init_state,2)));
            new_state(j, k) = rule(init_state(j, k), neighbors);
        end
    end
    init_state = new_state; % 更新状态矩阵
end