%I#13 2012年3月30日16:48:43
%S 0,0,1,0,2,3,0,3,1,2,0,4,8,12,6,0,5,10,15,2,7,0,6,11,13,14,8,5,0,7,9,
%T 14,10,13,3,4,0,8,12,4,11,3,7,15,13,0,9,14,7,15,6,1,8,5,12,0,10,15,5,
%U 3,9,12,6,11,14,0,11,6,7,12,10,1,9,2,4,15
%N三角形T(N,m)=Nim-N和m的乘积,按行读取,0<=m<=N。
%D E.R.Berlekamp、J.H.Conway和R.K.Guy,《胜利之道》,纽约学术出版社,第2卷。,1982年,见第60页。
%D J.H.Conway,《数字与游戏》,学术出版社,第52页。
%H R.J.Mathar,n表,n=0..3320的a(n)</a>
%H<a href=“/index/Ni#Nimmult”>为与尼姆乘法相关的序列的索引条目</a>
%F T(n,m)=A051775。
%e三角启动
%e 0;
%e 0,1;
%e 0、2、3;
%e 0、3、1、2;
%e 0、4、8、12、6;
%e 0、5、10、15、2、7;
%e 0、6、11、13、14、8、5;
%e 0、7、9、14、10、13、3、4;
%e 0、8、12、4、11、3、7、15、13;
%p我们从A003987继续:使用(a)加法表AT:=数组(0..NA,0..NA)和(b)用于较大值的nimsum过程计算Nim-乘法表;MT:=阵列(0..N,0..N);对于从0到N的a,执行MT[a,0]:=0;MT[0,a]:=0;MT[a,1]:=a;MT[1,a]:=a;od:对于从2到N的a,对于从a到N的b,do t1:={};对于i从0到a-1,对于j从0到b-1,do u1:=MT[i,b];u2:=公吨[a,j];
%p如果u1<=NA和u2<=NA,则u12:=AT[u1,u2];否则u12:=尼姆(u1,u2);fi;u3:=公吨[i,j];如果u12<=NA和u3<=NA,则u4:=AT[u12,u3];否则u4:=尼姆(u12,u3);fi;t1:={op(t1),u4}#t1:={op(t1),AT[AT[MT[i,b],MT[a,j]],MT[i,j]]};od;od;
%p t2:=排序(转换(t1,列表));j:=nops(t2);对于i从1到nops(t2),如果t2[i]<>i-1,那么j:=i-1;断裂;fi;od;MT[a,b]:=j;MT[b,a]:=j;od;od;
%Y参见A051776、A003987、A051775、A051911。
%K tabl,不,简单,好
%0、5
%A _N.J.A.Sloane,1999年12月20日