login
A356373
a(n) = Sum_{k=1..n} binomial(2*k, k) * A000005(k).
0
2, 14, 54, 264, 768, 4464, 11328, 62808, 208668, 947692, 2358556, 18583492, 39384692, 199851092, 820321172, 3825723122, 8492935562, 62943747362, 133634274962, 960713447882, 3113744945642, 11530140800522, 27997002255722, 285977831720522, 665209651033778, 2648883782826194
OFFSET
1,1
MATHEMATICA
Table[Sum[Binomial[2*k, k]*DivisorSigma[0, k], {k, 1, n}], {n, 1, 30}]
PROG
(PARI) a(n) = sum(k=1, n, binomial(2*k, k) * numdiv(k)); \\ Michel Marcus, Aug 05 2022
CROSSREFS
KEYWORD
nonn
AUTHOR
Vaclav Kotesovec, Aug 04 2022
STATUS
approved