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
Amiram Eldar, Table of n, a(n) for n = 1..217
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
KEYWORD
nonn
AUTHOR
Lekraj Beedassy, Oct 10 2003
EXTENSIONS
More terms from Ray Chandler, Nov 06 2003
STATUS
approved