%I#21 2022年6月13日21:27:53

%S 1,3,7,11,23,43,8717134368313672731546310923218474369187383，

%电话：1747633495276990511398103279620355924071118481122369623，

%电话：44739243894784871789569713579139437158278831431655767286311531572662306311453246123

%N“规则92”基本细胞自动机第N次迭代的十进制表示，从单个ON（黑色）单元开始。

%D S.Wolfram，《一种新的科学》，Wolfram Media，2002年；第55页。

%H Robert Price，<a href=“/A267052/b267052.txt”>n，a（n）表，n=0..1000</a>

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

%H S.Wolfram，<a href=“http://wolframscience.com/“>一种新的科学</a>

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

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

%F 2016年1月10日和2019年4月17日来自科林·巴克的推测：（开始）

%对于n>0，F a（n）=（3+2*（-1）^n+2^（2+n））/3。

%当n>3时，F a（n）=2*a（n-1）+a（n-2）-2*a（n-3）。

%财务报表：（1+x-4*x^3）/（（1-x）*（1+x）x（1-2*x））。

%F（结束）

%t规则=92；行=20；ca=细胞自动机[rule，{{1}，0}，rows-1，{All，All}]；（*以单个黑色单元格开始*）catri=表[Take[ca[[k]]，{rows-k+1，rows+k-1}]，{k，1，rows}]；（*每行的截断列表*）表[FromDigits[catri[[k]]，2]，{k，1，rows}]（*行的十进制表示*）

%Y参考A267050、A267051。

%K nonn，简单

%0、2

%2016年1月9日A _罗伯特价格