%I#16 2017年9月11日15:53:13
%序号1,2,1,3,4,2,4,9,12,6,5,16,36,48,24,6,25,80180240120,7,36150480,
%电话:10801440720,8,492521050336075610805040,9,6439220168400,
%电话:26880604808064040320、10、8157635281814475600241920544320
%N行读取的类阶乘三角形:T(0,0)=1;T(n+1,0)=T(n,0)+1;T(n+1,k+1)=T(n,0)*T(n、k),k=0..n。
%C行(0)={1};行(n+1)=行(n)乘以n并加上(n+1;
%C A111063(n+1)=第n行的总和;
%C T(2*n,n)=A002690(n),中心项;
%C T(n,0)=n+1;
%C T(n,1)=A000290(n),n>0;
%C T(n,2)=A011379(n-1),n>1;
%C T(n,3)=A047927(n),n>2;
%C T(n,4)=A192849(n-1),n>3;
%C T(n,5)=A000142(5)*A027810(n-5),n>4;
%C T(n,6)=A000142(6)*A027818(n-6),n>5;
%C T(n,7)=A000142(7)*A056001(n-7),n>6;
%C T(n,8)=A000142(8)*A056003(n-8),n>7;
%C T(n,9)=A000142(9)*A056114(n-9),n>8;
%C T(n,n-10)=11*A051431(n-10),n>9;
%C T(n,n-9)=10*A049398(n-9),n>8;
%C T(n,n-8)=9*A049389(n-8),n>7;
%C T(n,n-7)=8*A049388(n-7),n>6;
%C T(n,n-6)=7*A001730(n),n>5;
%C T(n,n-5)=6*A001725(n),n>5;
%C T(n,n-4)=5*A001720(n),n>4;
%C T(n,n-3)=4*A001715(n),n>2;
%C T(n,n-2)=A070960(n),n>1;
%C T(n,n-1)=A052849(n),n>0;
%C T(n,n)=A000142(n);
%C T(n,k)=A137948(n,k)*A007318(n、k),0≤k≤n。
%H Reinhard Zumkeller,<a href=“/A245334/b245334.txt”>三角形的n=0..125行,展平</a>
%F T(n,k)=n*(n+1-k)/(n-k)!.-_沃纳·舒尔特(Werner Schulte),2017年9月9日
%e、。0: 1;
%e、。1: 2, 1;
%e、。2: 3, 4, 2;
%e、。3: 4, 9, 12, 6;
%e、。4: 5, 16, 36, 48, 24;
%e。5: 6, 25, 80, 180, 240, 120;
%e、。6: 7, 36, 150, 480, 1080, 1440, 720;
%e、。7: 8, 49, 252, 1050, 3360, 7560, 10080, 5040;
%e、。8: 9, 64, 392, 2016, 8400, 26880, 60480, 80640, 40320;
%e、。9: 10, 81, 576, 3528, 18144, 75600, 241920, 544320, 725760, 362880.
%t表[(n!)/((n-k)!)*(n+1-k),{n,0,9},{k,0,n}]//展平(*_Michael De Vlieger_,2017年9月10日*)
%o(哈斯克尔)
%o a245334 n k=a245334_tabl!!不!!k
%o a245334_row n=a245334 _ tabl!!n个
%o a245334_tabl=迭代(\row@(h:_)->(h+1):映射(*h)行)[1]
%Y参见A111063(行总和)、A240993(行产品)、A002690(中心术语)。
%Y参见A000290、A011379、A027810、A0278.18、A047927、A056001、A056003、A056114、A192849。
%Y参见A000142、A001715、A001720、A001725、A0001730、A049388、A04938、A049398、A051431、A052849、A070960。
%Y参考A007318,A137948。
%K nonn,表
%0、2
%A _Reinhard Zumkeller,2014年8月30日
|