OFFSET
1,2
COMMENTS
Is this sequence finite?
Heuristically, the sequence is infinite with about 2 sqrt(log x) members up to x. - Charles R Greathouse IV, Aug 14 2013
LINKS
Giovanni Resta, C program
EXAMPLE
5 = 2+3 = 1+4. 28 = 2+3+5+7+11 = 1+4+6+8+9.
MAPLE
P:=proc(q) local a, b, c, d, n; a:=0; b:=0; c:=0; d:=0; print(a);
for n from 1 to q do b:=nextprime(b); a:=a+b;
while c<a do d:=d+1; if not isprime(d) then c:=c+d; fi; od;
if c=a then print(a); fi; od; end: P(10^9); # Paolo P. Lava, Feb 23 2018
MATHEMATICA
With[{p = Prime@ Range[10^7]}, {0}~Join~Intersection[Accumulate@ p, Accumulate@ Complement[Range@ Max@ p, p]]] (* Michael De Vlieger, Feb 25 2018 *)
CROSSREFS
KEYWORD
nonn,more,nice
AUTHOR
Paolo P. Lava and Giorgio Balzarotti, Jan 15 2009
EXTENSIONS
Corrected definition and a(6)-a(7) from R. J. Mathar, Jan 17 2009
a(8)-a(11) from Donovan Johnson, Feb 19 2009
a(12)-a(14) from Giovanni Resta, Aug 14 2013
Edited and a(1)=0 prepended by Max Alekseyev, Feb 10 2018
STATUS
approved