#来自在线整数序列百科全书的问候!http://oeis.org/; 搜索:id:a122454 展示1-1的1个1 ;%I a122454;%S a122454 1,2,1,1,3,9,1,1,3,9,1,4,24,18,24,24,24,24,24,24,24,24,24,24,24,1,1,1,5,50100100150,50,1,6,6,90225510503001200,;%T a122454 300675,90,1,1,71474417357573535362450357512257573503675735,5,;;%U a122454 2205147,1,82242484156898086898088415689800150,15689408156817601568039029400 %N a122454一个形状为A000041的三角形a044(a044)由a044开始的序列(a044,a044,a044,a044,a044)开始(a044,a044,a044,a044,a044,a044,a044,a044,a044,a044,a044,a044,a044,a044,a044,a044,a044,a044,a044,a044,a044,a044,a044,a044,a044,a044,a044,a044,a0,a044,a0,a044,a0,a044,a0,a044,a0,a0,a0,a0,a0,a0,a0二、二、二、二、二、二、二、四、四、四、四、四、二十四、十八、二十四、一百五十、五十、一百、一百五十、五十、一百、一百五十、五十、五十、一百五十、一百五十、一百、三百、一百五十、一百五十、一百、三百、三百、三百、六七五、九十、九十、一、一、二、一、二、一、二、三、四、四、四、四、五、三、六、七、四、四、五、三、六、七、五、六、七、四、四、七、五、七、五、七、五、五、二、五、二、五、五、五、二、五、五、五、五、五、五、五、五、五、二、五、二、三、二、二、二、三、二、54 sortAbrSteg:=proc(L1,L2)局部i;如果nops(L1)<nops(L2)然后返回(true);elif nops(L2)<nops(L1)然后返回(false);else for i from 1 to nops(L1)如果op(i,L1)<op(i,L2)则返回(false);fi;od;RETURN(true);fi;end:A098546:=proc(n,k)局部prts,m;prts:=combat[partition](n);prts:=sort(prts,sortAbrSteg);如果k<=nops(prts),则m:=nops(op(k,prts));二项式(n,m);除此之外0;fi;结束:M3:=proc(L)当地n,k,an,an,RESU;n:=add(i,i=L);结果:=阶(n);对于k从1到n的n,做一个:=AD(1分钟(abs(j-k),1,j=L),j=L);结果:=RESU/(factorial(k))^an/factorial(an);od;结束:A036040:=proc(n,k)本地prts,m;prts:=合合合[分区](n);prts:=排序(prts,sortBSTEG),如果k<=nops(prts,prts)nops(prts,SORTASTEG);如果k<=nops(prts(prts(prts,PR然后是M3(op(k,其他0;fi;结束:A122454:=proc(n,k)A098546(n,k)*a36040(n,k);end:从1到10为n从1到10做k从1到k从1到combat[numpart](n)do a:=a22454(n,k);printf(“%d,”,a);od;od;35; u R.J.Mathar_,2007年7月17日;%Y A122454 54 Cf.A122455。 %k A122454 Cf.A122455。;%k A122454简单,nonn,tabf %O a22454 1,2,2,2,2,2,2,2,2,2,2,2,2,2,[或n,阿尔福德·阿诺德,2006年9月18日 %E A122454更多条款来自2007年7月17日 %E A122454更多条款