%I#26 2020年9月1日06:25:26
%S 1,1,1,1,1,1,1,0,1,1,1,1,1,0,1,1,1,1,1,11,1,1,0,11,1,0,1,1,1,0,
%T 1,1,1,1,0,1,1,1,0,1,1,1,1,1,1,1,1,1,11,0,1,0,1,1,1,0,1,1,0,11,1,1,1,
%U 1,1,0,1,1,1,0,1,1,1,0,1,0,1,1,1,1,01,1,1,1,1,1,1,0,1,1,1,1,1,10,1
%N规则190基本细胞自动机第N次迭代的二进制表示,从单个黑细胞开始。
%C行n的长度为2*n+1。-_汉斯·哈弗曼,2002年5月26日
%H Robert Price,n的表格,a(n)表示n=0..9999</a>
%H Eric Weisstein的数学世界,<a href=“http://mathworld.wolfram.com/Rule190.html“>规则190</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>
%e来自Michael De Vlieger_,2020年8月21日:(开始)
%e不规则阵列开始:
%e 0:1
%e 1:1 1 1
%电子2:1 1 1 0 1
%电子邮箱3:1 1 1 0 1 1 1 1
%e 4:1 1 1 0 1 1 1 01
%电子邮箱5:1 1 1 0 1 1 1 1 10 1 1 1
%电子邮箱6:1 1 1 0 1 1 1 10 1 1 0
%电子邮箱7:1 1 1 1 0 1 1 1 01 1 0 1
%电子邮箱8:1 1 1 1 0 1 1 1 10 1 1 1 01 1 0 1
%电子邮箱9:1 1 1 1 0 1 1 1 01 1 0 1 11 0 1 1 0 11
%e。。。(结束)
%t使用[{nn=9},MapIndexed[#1[[#2+1;;2 nn-#2+1]]&@@{#1,nn-第一个[#2]+1}&,CellularAutomaton[190,{{1},0},nn]]//Flatten(*Michael De Vlieger_,2020年8月21日*)
%Y请参阅A265688(二进制行)、A037576(十进制行)和A032766(数字1)。
%K nonn,标签
%0、1
%A _Eric W.Weisstein,2006年4月13日
|