A135482 a(n) = (1/4)*Sum_{j=1..n} 2^prime(j).

0, 1, 3, 11, 43, 555, 2603, 35371, 166443, 2263595, 136481323, 673352235, 35033090603, 584788904491, 2783812160043, 37968184248875, 2289767997934123, 146404956073789995, 722865708377213483, 37616353855796316715, 627912164214501968427, 2989095405649324575275

Offset

0,3

Links

G. C. Greubel, Table of n, a(n) for n = 0..450 (a(0) = 0 added by M. F. Hasler).

Formula

a(n) = A076793(n)/4. - M. F. Hasler, Oct 30 2018

Maple

A135482:= n-> add(2^ithprime(i)/4, i=1..n): seq(A135482(n), n=0..20); # Wesley Ivan Hurt, Feb 02 2014

Mathematica

Accumulate[Table[Floor[2^i/4], {i, Prime[Range[20]]}]] (* Harvey P. Dale, Dec 05 2013 *)

Prog

(Magma) [&+[2^(NthPrime(k)-2): k in [1..n]]: n in [1..25]]; // Bruno Berselli, Sep 24 2015
(PARI) a(n) = sum(k=1, n, 2^prime(k))/4; \\ Michel Marcus, Oct 15 2016

Crossrefs

Cf. A000040, A000079, A076793, A080355.

Partial sums of A135620.

Sequence in context: A309473 A349058 A051257 * A360475 A126614 A000979

Adjacent sequences: A135479 A135480 A135481 * A135483 A135484 A135485

Keyword

nonn

Author

Ctibor O. Zizka, Feb 07 2008

Extensions

More terms from Harvey P. Dale, Dec 05 2013

a(0) = 0 prepended by M. F. Hasler, Oct 30 2018

Status

approved