A095938 a(n+1) = (a(n)-1)-th prime + 1.

2, 3, 4, 6, 12, 32, 128, 710, 5382, 52712, 648392, 9737334, 174440042, 3657500102, 88362852308, 2428095424620, 75063692618250, 2586559730396078, 98552043847093520, 4123221751654370052, 188272405179937051082, 9332039515881088707362, 499720579610303128776792, 28785866289100396890228042

Offset

1,1

Links

Table of n, a(n) for n=1..24.

N. Lygeros, G-test. [From Herman Jamke (hermanjamke(AT)fastmail.fm), Dec 06 2008]

Mathematica

NestList[Prime[ # - 1] + 1 &, 2, 16] (* Robert G. Wilson v *)

Prog

(PARI) a(n)=if(n<2, 2, prime(a(n-1)-1)+1);
for(n=1, 10, print1(a(n), ", "));

Crossrefs

Equals A007097 + 1.

Sequence in context: A018405 A018419 A220826 * A018460 A344661 A018484

Adjacent sequences: A095935 A095936 A095937 * A095939 A095940 A095941

Keyword

nonn

Author

Herman Jamke (hermanjamke(AT)fastmail.fm), Jul 13 2004

Extensions

a(19)-a(24) from Giovanni Resta, using terms of A007097, Apr 03 2019

Status

approved