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

Author

Ctibor O. Zizka, Feb 07 2008

Keywords

• nonn

Links

• G. C. Greubel, Table of n, a(n) for n = 0..450 (a(0) = 0 added by _M. F. Hasler_).

Crossrefs

Cf. A000040, A000079, A076793, A080355.

Partial sums of A135620.

Programs

Magma

[&+[2^(NthPrime(k)-2): k in [1..n]]: n in [1..25]]; // Bruno Berselli, Sep 24 2015

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 *)

PARI

a(n) = sum(k=1, n, 2^prime(k))/4; \\ Michel Marcus, Oct 15 2016

Formula

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

Extensions

More terms from Harvey P. Dale, Dec 05 2013

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