cp's OEIS Frontend

A141906 Triangle t(n,m) = (n*m)!/(m!^n) read by rows, 0<=m<=n.

%I A141906 #20 Jan 12 2019 08:07:08
%S A141906 1,1,1,1,2,6,1,6,90,1680,1,24,2520,369600,63063000,1,120,113400,
%T A141906 168168000,305540235000,623360743125120,1,720,7484400,137225088000,
%U A141906 3246670537110000,88832646059788350720,2670177736637149247308800
%N A141906 Triangle t(n,m) = (n*m)!/(m!^n) read by rows, 0<=m<=n.
%C A141906 Row sums are in A221177.
%H A141906 Seiichi Manyama, <a href="/A141906/b141906.txt">Rows n = 0..26, flattened</a>
%e A141906 1;
%e A141906 1, 1;
%e A141906 1, 2, 6;
%e A141906 1, 6, 90, 1680;
%e A141906 1, 24, 2520, 369600, 63063000;
%e A141906 1, 120, 113400, 168168000, 305540235000, 623360743125120;
%e A141906 1, 720, 7484400, 137225088000, 3246670537110000, 88832646059788350720, 2670177736637149247308800;
%p A141906 A141906 := proc(n,m)
%p A141906         (n*m)!/m!^n ;
%p A141906 end proc:
%p A141906 seq(seq(A141906(n,m),m=0..n),n=0..5) ; # _R. J. Mathar_, Nov 08 2011
%t A141906 Clear[t, n, m]; t[n_, m_] = (n*m)!/m!^n; Table[Table[t[n, m], {m, 0, n}], {n, 0, 10}]; Flatten[%]
%Y A141906 Cf. A034841, A187783, A221177.
%K A141906 nonn,tabl,easy
%O A141906 0,5
%A A141906 _Roger L. Bagula_ and _Gary W. Adamson_, Sep 14 2008