A356344 a(n) = Sum_{k=1..n} binomial(2*k, k) * sigma(k).

2, 20, 100, 590, 2102, 13190, 40646, 233696, 865756, 4191364, 12656548, 88372916, 233981316, 1196779716, 4919600196, 23553092286, 65558004246, 419488280946, 1126393556946, 6915947767386, 24140199749466, 99887762443386, 297490099905786, 2232346320891786, 6151075120462098

Offset

1,1

Comments

The average value of a(n) is Pi^(3/2) * sqrt(n) * 2^(2*n+1) / 9.

Links

Table of n, a(n) for n=1..25.

Mathematica

Table[Sum[Binomial[2*k, k]*DivisorSigma[1, k], {k, 1, n}], {n, 1, 30}]

Prog

(PARI) a(n) = sum(k=1, n, binomial(2*k, k) * sigma(k)); \\ Michel Marcus, Aug 05 2022

Crossrefs

Cf. A000203, A024916, A185003, A351146.

Sequence in context: A033840 A086755 A107483 * A220856 A035599 A222556

Adjacent sequences: A356341 A356342 A356343 * A356345 A356346 A356347

Keyword

nonn

Author

Vaclav Kotesovec, Aug 04 2022

Status

approved