login
A087864
Primes generated from A039726.
2
3, 7, 31, 211, 2311, 43891, 1272811, 47093971, 2213416591, 148298911531, 15274787887591, 2734187031878611, 522229723088814511, 116457228248805635731, 31559908855426327282831, 9247053294639913893869191, 2931315894400852704356533231, 1691369271069292010413719673711
OFFSET
1,1
REFERENCES
Harvey Dubner, Recursive Prime Generating Sequences, Journal of Recreational Mathematics, Vol. 29, No. 3 (1998), pp. 170-175, see p. 172, Table 2.
LINKS
MATHEMATICA
k = 1; cp = 2; ct = 1; n[ct] = 3; While[ct < 20, k++; p = Prime[k]; cp1 = cp*p; If[PrimeQ[cp1 + 1], cp = cp1; ct++; n[ct] = cp + 1]]; Table[n[k], {k, 1, ct}] (* Lei Zhou *)
CROSSREFS
Cf. A039726.
Sequence in context: A289125 A083772 A093441 * A066676 A073917 A030521
KEYWORD
nonn
AUTHOR
Lekraj Beedassy, Oct 10 2003
EXTENSIONS
More terms from Ray Chandler, Nov 06 2003
STATUS
approved