login
A350503
Self-convolution of sigma_n(n).
1
1, 10, 81, 826, 9766, 141448, 2371173, 46285454, 1025108476, 25583455958, 709014239914, 21645251877538, 721074846998772, 26036416881319860, 1012400617533469985, 42173042024213765280, 1873237518724869171647, 88367918629612594749582, 4411615292876287372479856
OFFSET
1,2
FORMULA
a(n) = Sum_{k=1..n} A023887(k) * A023887(n-k+1).
a(n) ~ 2*n^n. - Vaclav Kotesovec, Aug 20 2025
MATHEMATICA
Table[Sum[DivisorSigma[k, k]*DivisorSigma[n - k + 1, (n - k + 1)], {k, n}], {n, 20}]
With[{lst=Table[DivisorSigma[n, n], {n, 20}]}, Table[ListConvolve[Take[lst, k], Take[lst, k]], {k, Length[lst]}]]//Flatten (* Harvey P. Dale, Oct 17 2025 *)
CROSSREFS
Cf. A023887 (sigma_n(n)).
Sequence in context: A037485 A343276 A363559 * A277205 A308862 A193327
KEYWORD
nonn
AUTHOR
Wesley Ivan Hurt, Jan 06 2022
STATUS
approved