%I#37 2023年7月27日15:40:13
%S 1,1,1,1,,1,0,1,1,1,1,1,1,1,1,1,1,11,1,1,0,0,0,1,1,1,11,1,1,0,0,0,1,1,
%T 1,1,1,1,0,0,1,1,0,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
%U 0,0,0,1,1,1,1,1,1,1,0,0、0,0和0,0
%N由行读取的三角形,给出由“规则126”生成的元胞自动机的连续状态。
%C行n的长度为2n+1。
%D S.Wolfram,《一种新的科学》,Wolfram Media,2002年;第3章。
%H Robert Price,<a href=“/A071035/b071035.txt”>n表,n=0..10000的a(n)</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=“https://oeis.org/wiki/Index_to_Elementary_Cellular_Automata网站“>基本元胞自动机索引</a>
%H<a href=“/index/Ce#cell”>与细胞自动机相关的序列的索引条目</a>
%e三角形开始:
%e 1,
%e 1、1、1,
%e 1、1、0、1、1,
%e 1,1,1,
%e 1,1,0,0,0,0,0,1,1,
%e 1,1,1,1,0,0,1,1,1,1,
%e 1,1,0,0,1,1,
%e 1,1,1,
%e 1,1,0,0,0,0,0,
%e 1,1,1,
%e…-_N.J.A.Sloane,2014年8月24日
%t A071035list[rowmax_]:=映射索引的[ArrayPad[#1,#2-rowmax-1]&,CellularAutomaton[126,{{1},0},rowmax]];A071035list[10](*生成11行*)(*_Paolo Xausa_,2023年7月18日*)
%Y关于ON状态的数量,请参见A071051。
%Y右半部分是三角形A127872。
%Y参考A036987(中柱)。
%K nonn,标签
%0、1
%A Hans Havermann,2002年5月26日
%E由_Hans Havermann_更正,2012年1月7日
|