login
A324914
a(n) = Sum_{k=1..n} 2^k * tau(k), where tau(k) = A000005(k).
2
2, 10, 26, 74, 138, 394, 650, 1674, 3210, 7306, 11402, 35978, 52362, 117898, 248970, 576650, 838794, 2411658, 3460234, 9751690, 18140298, 34917514, 51694730, 185912458, 286575754, 555011210, 1091882122, 2702494858, 3776236682, 12366171274
OFFSET
1,1
COMMENTS
Partial sums of A323351 with n=0 term of A323351 omitted. - Robert Israel, Jun 27 2019
LINKS
Eric Weisstein's World of Mathematics, Divisor Function
MAPLE
ListTools:-PartialSums([seq(2^k*numtheory:-tau(k), k=1..100)]); # Robert Israel, Jun 27 2019
MATHEMATICA
Accumulate[Table[2^k*DivisorSigma[0, k], {k, 1, 30}]]
CROSSREFS
KEYWORD
nonn
AUTHOR
Vaclav Kotesovec, Mar 18 2019
STATUS
approved