%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