A074839 a(0) = 1, a(n+1) = a(n) + next prime larger than a(n).

1, 3, 8, 19, 42, 85, 174, 353, 712, 1431, 2864, 5743, 11492, 22989, 45982, 91971, 183968, 367939, 735888, 1471789, 2943596, 5887195, 11774408, 23548837, 47097690, 94195387, 188390808, 376781617, 753563240, 1507126509, 3014253028

Offset

0,2

Links

Table of n, a(n) for n=0..30.

Example

For instance 1+2=3, 3+5=8, 8+11=19, 19+23=42, 42+43=85, ...

Mathematica

Needs[ "NumberTheory`NumberTheoryFunctions`" ]; NestList[ # + NextPrime[ # ] &, 1, 50 ]

Prog

(Python)
from itertools import islice
from sympy import nextprime
def A074839_gen(): # generator of terms
    yield (a:=1)
    while (a:=a+nextprime(a)): yield a
A074839_list = list(islice(A074839_gen(), 20)) # Chai Wah Wu, Mar 19 2024

Crossrefs

Cf. A063807.

Sequence in context: A178457 A072916 A298406 * A262156 A002318 A229198

Adjacent sequences: A074836 A074837 A074838 * A074840 A074841 A074842

Keyword

easy,nonn

Author

Robert G. Wilson v, Sep 09 2002

Status

approved