proposed
approved
proposed
approved
editing
proposed
Triangle T(n, k) = binomial((n-k)^2, k^2) read by rows,.
approved
editing
G. C. Greubel, <a href="/A123163/b123163_1.txt">Rows n = 0..50 of the triangle, flattened</a>
reviewed
approved
proposed
reviewed
editing
proposed
Triangle read by rows: T(n, k) = binomial[((n-mk)^2,m k^2].) read by rows,
G. C. Greubel, <a href="/A123163/b123163_1.txt">Rows n = 0..50 of the triangle, flattened</a>
aT(n,m k) = (n^2 - 2*n*m k + mk^2)!/((mk^2)!(n^2 - 2*n*mk)!).
From G. C. Greubel, Jul 18 2023: (Start)
T(n, 0) = T(2*n, n) = 1.
T(n, n) = A000007(n).
Sum_{k=0..n} T(n, k) = A123165(n). (End)
n\m k | 0 1 2 3 4 5 6 7
----+---------------------------------
----+--------------------------------------------
0 | 1;
1 | 1, 0;
2 | 1, 1, 0;
3 | 1, 4, 0, 0;
4 | 1, 9, 1, 0, 0;
5 | 1, 16, 126, 0, 0, 0;
6 | 1, 25, 1820, 1, 0, 0, 0;
7 | 1, 36, 12650, 11440, 0, 0, 0, 0;
tT[n_, m_k_] = (n^2 - 2*n*m k+ mk^2)!/((mk^2)!(n^2 - 2*n*mk)!); a = Table[Table[t[n, m], {m, 0, n}], {n, 0, 10}]; Flatten[a]
Table[T[n, k], {n, 0, 10}, {k, 0, n}]//Flatten
(Magma) [Binomial((n-k)^2, k^2): k in [0..n], n in [0..12]]; // G. C. Greubel, Jul 18 2023
(SageMath) flatten([[binomial((n-k)^2, k^2) for k in range(n+1)] for n in range(13)]) # G. C. Greubel, Jul 18 2023
approved
editing
proposed
approved
editing
proposed