%I#21 2021年8月31日05:33:02

%S 1,1,1,0,1,1,0,0,0，1,1,0,0,1,0,10,00,01,1,00,0，

%T 0,0,1,0,0,0，0,00,0_0,0,0-0,0.0，1,1,0,0.00，0,0-0，0,1,0，

%U 0,0,0,1,0,0 0,0，0,0

%N由行读取的三角形，给出由“规则14”生成的元胞自动机的连续状态，由单个ON（黑色）单元启动。

%C行n的长度为2n+1。

%C该序列也由规则46、142和174生成。

%H Robert Price，n表，n=0..9999时的a（n）</a>

%H Eric Weistein的《数学世界》，<a href=“http://mathworld.wolfram.com/ElementaryCellularAutomaton.html“>基本细胞自动机</a>

%H Stephen Wolfram，<a href=“http://wolframscience.com/“>《一种新的科学》，2002年；第55页。

%H<a href=“/index/Ce#cell”>与细胞自动机相关的序列的索引条目</a>

%H<a href=“https://oeis.org/wiki/Index_to_Elementary_Cellular_Automata网站“>基本元胞自动机索引</a>

%e前十行：

%第1页

%e 1 1 0

%e 1 1 0 0

%e 1 1 0 0 0 0

%e 1 1 0 0 0 0 00

%e 1 1 0 0 0 0 00 0 0 0

%e 1 1 0 0 0 0 00 0 0 0零0 0 0

%e 1 1 0 0 0 0零0 0 0 00 0 0 0

%e 1 1 0 0 0 0零0 0 0 00 0 0 0

%e 1 1 0 0 0 0零0 0 0 00 0 0 0

%t规则=14；行=20；ca=细胞自动机[rule，{{1}，0}，rows-1，{All，All}]；（*以单个黑色单元格开始*）catri=表[Take[ca[[k]]，{rows-k+1，rows+k-1}]，{k，1，rows}]；（*每行的截断列表*）展平[catri]（*CA的三角形表示*）

%Y参见A164908、A266299、A267006（反向行）。

%K nonn，tabf，简单

%O 0（零）

%2015年12月26日A报价