login
Triangle read by rows: t(n,m) = (m+1)^n*m^(n*(n-1)/2).
1

%I #12 Jun 03 2023 07:26:19

%S 1,1,2,1,3,18,1,4,48,1728,1,5,100,8000,2560000,1,6,180,27000,20250000,

%T 75937500000,1,7,294,74088,112021056,1016255020032,55316793250381824,

%U 1,8,448,175616,481890304,9256148959232,1244544764462497792,1171355575953987221848064

%N Triangle read by rows: t(n,m) = (m+1)^n*m^(n*(n-1)/2).

%F If m==0, t(n,0)=1, otherwise t(n,m) = (m+1)^n*m^(n*(n-1)/2).

%e {1},

%e {1, 2},

%e {1, 3, 18},

%e {1, 4, 48, 1728},

%e {1, 5, 100, 8000, 2560000},

%e {1, 6, 180, 27000, 20250000, 75937500000},

%e {1, 7, 294, 74088, 112021056, 1016255020032, 55316793250381824}

%t a = Table[Table[If[m == 0, 1, (m + 1)^n*m^(n*(n - 1)/2)], {n, 0, m}], {m, 0, 10}];

%t Flatten[a]

%o (PARI) t(n,m)=if (m==0, 1, (m+1)^n*m^(n*(n-1)/2));

%o for (i=0, 7, for (j=0, i, print1(t(j,i), ", ")); print);

%o \\ _Michel Marcus_, Jun 03 2023

%Y Cf. A132945.

%K nonn,easy,tabl

%O 0,3

%A _Roger L. Bagula_, Nov 19 2007