Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A283462
Prime summand recurrence: a(n+1) = the sum of the primes <= a(n) with a(0) = 3.
0
3, 5, 10, 17, 58, 381, 12718, 9024109, 2626688611773, 122821324737555729064487
OFFSET
0,1
COMMENTS
Obviously beginning with any number less than 3 goes nowhere.
Employed Kim Walisch's primesum.
MATHEMATICA
NestList[Sum[Prime@ i, {i, PrimePi@ #}] &, 3, 8] (* Michael De Vlieger, Mar 09 2017 *)
PROG
(PARI) a(n) = if(n==0, 3, sum(k=1, primepi(a(n-1)), prime(k))); \\ Indranil Ghosh, Mar 13 2017
CROSSREFS
Subsequence of A007504.
Sequence in context: A366108 A096395 A026687 * A270414 A227208 A009854
KEYWORD
hard,nonn
AUTHOR
Robert G. Wilson v, Mar 08 2017
STATUS
approved