OFFSET
1,3
LINKS
Seiichi Manyama, Antidiagonals n = 1..140, flattened
FORMULA
L.g.f. of column k: -log(Product_{j>=1} (1 - j^k*x^j)^(1/j)).
A(n,k) = Sum_{d|n} (n/d)^(k*d).
EXAMPLE
Square array begins:
1, 1, 1, 1, 1, 1, 1, ...
2, 3, 5, 9, 17, 33, 65, ...
2, 4, 10, 28, 82, 244, 730, ...
3, 9, 33, 129, 513, 2049, 8193, ...
2, 6, 26, 126, 626, 3126, 15626, ...
4, 24, 182, 1458, 11954, 99594, 840242, ...
MATHEMATICA
T[n_, k_] := DivisorSum[n, #^(k*n/#) &]; Table[T[k, n - k], {n, 1, 11}, {k, 1, n}] // Flatten (* Amiram Eldar, May 11 2021 *)
PROG
(PARI) T(n, k) = sumdiv(n, d, (n/d)^(k*d));
matrix(9, 9, n, k, T(n, k-1)) \\ Michel Marcus, Jun 02 2019
CROSSREFS
KEYWORD
nonn,tabl
AUTHOR
Seiichi Manyama, Jun 02 2019
STATUS
approved