%I#20 2021年8月19日09:48:07
%S 1,0,5,96,291952,2932672,29524192,298388512,29134217632,29,
%电话:2147483552,2934359738272,29549755813792,29879609302121,29,
%电话:140737488355232、292251799813685152、2936028797018963872、29576460752303423392、299223372036854775712
%N“规则9”基本细胞自动机第N次迭代的十进制表示,从单个ON(黑色)细胞开始。
%D S.Wolfram,《一种新的科学》,Wolfram Media,2002年;第55页。
%H Robert Price,<a href=“/A266245/b266245.txt”>n,a(n)表,n=0..999</a>
%H Eric Weisstein的数学世界,<a href=“http://mathworld.wolfram.com/ElementaryCellularAutomaton.html“>基本元胞自动机</a>
%H<a href=“/index/Ce#cell”>与细胞自动机相关的序列的索引条目</a>
%H<a href=“https://oeis.org/wiki/Index_to_Elementary_Cellular_Automata网站“>基本元胞自动机索引</a>
%H<a href=“/index/Rec#order_04”>具有常数的线性重复出现的索引条目,签名(0,17,0,-16)。
%F来自_Colin Barker_,2015年12月28日和2019年4月14日:(开始)
%当n>7时,F a(n)=17*a(n-2)-16*a(n-4)。
%传真:(1-12*x^2+96*x^3-40*x^4+320*x^5-384*x^6+1024*x*7)/((1-x)*(1+x)*。
%F(结束)
%F a(n)=4^n/2+90*层(4^n/60)-90,对于奇数n>3;对于偶数n>3,a(n)=29。-_Karl V.Keller,Jr.,2021年8月17日
%t规则=9;行数=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}](*行的十进制表示法*)
%o(Python)打印([1,0,5,96]+[4**n//2+90*(4**n//60)-90,如果n为%2,则范围(4,50)内的n为29)#_Karl V.Keller,Jr.,2021年8月17日
%Y参见A266243、A266244。
%K nonn,简单
%0、3
%2015年12月25日A报价
|