登录
OEIS基金会由OEIS的用户捐款和西蒙斯基金会的资助。

γ

标志


提示
问候整数序列的在线百科全书!)
A72455 基于5规则冯诺依曼邻域的“规则481”定义的二维元胞自动机生长第n阶段的活跃(ON,Black)细胞数。
1, 4, 13,28, 33, 84,69, 172, 117,280, 153, 428,225, 592, 281,788, 365, 992,445, 1228, 541,1448, 685, 1792,809, 2140, 857,2388, 913, 2636,1025, 3104, 1193,3460, 1401, 3944,3460, 1401, 3944,γ,γ,γ 列表图表参考文献历史文本内部格式
抵消

0、2

评论

在0级时用单个黑色(ON)单元初始化。

推荐信

沃尔夫拉姆,一种新的科学,WOLFRAM媒体,2002;第170页。

链接

Robert Pricen,a(n)n=0…128的表

Robert Price前20个阶段的图表

斯隆,元胞自动机中的On元数,阿西夫:1503.01168 [数学,CO],2015

Eric Weisstein的数学世界,元胞自动机

S. Wolfram,一种新的科学

与元胞自动机相关的序列索引条目

2D 5邻域元胞自动机的索引

元胞自动机索引

Mathematica

CAST[规则],[AY]:= MAP[Tr[ [ 10 -α] ],ListCurvVe[ {{ 0, 2, 0 },{ 2, 1, 2 },{ 0, 2, 0 },A,2〕,{ 2 };

代码=481;阶段=128;

规则=整数数字[代码,2, 10 ];

g=2*级+1;(*最大网格尺寸*)

A= pDeLe[ {{ 1 }},{g,g},0,地板[{g,g}/2〕;(*网格上的单元* *)

Ca=a;

CA=表[CA=CAST[规则,CA ],{n,1,阶段+ 1 } ];

预置〔CA,A〕;

(*调整全网格以反映每个阶段的一个细胞生长*)

K=(长度[Ca]〔1〕+1)/ 2;

CA=表[表[C][[n][[j]],[k+1-n,k-1 +n]],{j,k+1-n,k-1 +n},{n,1,k};

MAP[函数[Apple [ Plus,Plutt[Y](1)],CA ](*对每个阶段的细胞计数*)

交叉裁判

语境中的顺序:A024970 A079430 A70942*A220775 A29 8017 A307222

相邻序列:γA27 2452 A242453 A72454*A72456 A72457 A72458

关键词

诺恩容易

作者

罗伯特·普莱斯4月29日2016

地位

经核准的

查找γ欢迎γ维基γ注册γ音乐γ情节2γ演示γ指数γ浏览γ更多γ网络摄像机
贡献新的SEQ。或评论γ格式γ样式表γ变换γ超级导引头γ最近
OEIS社区通过保持OEIS基金会

许可协议、使用条款、隐私政策。.

最后修改了2月28日10:22 EST 2020。包含332323个序列。(在OEIS4上运行)