|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
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
|
|
|
STATUS
|
approved
|
|
|
|