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