|
Search: id:A039726
|
|
|
| A039726 |
|
Recursive prime generating sequence. |
|
+0
7
|
|
| 2, 3, 5, 7, 11, 19, 29, 37, 47, 67, 103, 179, 191, 223, 271, 293, 317, 577, 643, 673, 809, 863, 877, 1049, 1093, 1129, 1151, 1381, 1613, 1637, 2089, 2131, 2311, 2957, 3623, 3833, 4253, 4271, 4423, 4673, 5939, 7717, 8167, 9133, 9533, 9539, 9679, 11059, 11743, 11969, 14759, 15859, 15971, 16139, 17431, 17713, 17761, 19309, 19373, 20747, 20983, 23741, 25261, 25933
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
REFERENCES
|
H. Dubner, Recursive Prime Generating Sequences, Journal of Recreational Mathematics, 29(3) 170-175 1998 Baywood NY.
|
|
FORMULA
|
2*3*5*7*...*a_n+1 is prime. a_n is prime. a_(n+1) > a_n. a_n is smallest possible prime.
|
|
MATHEMATICA
|
k = 1; cp = 2; ct = 1; n[ct] = 2; While[ct < 64, k++; p = Prime[k]; cp1 = cp*p; If[PrimeQ[cp1 + 1], cp = cp1; ct++; n[ct] = p]]; Table[n[k], {k, 1, ct}] (Lei Zhou)
|
|
CROSSREFS
|
For the primes so generated see A087864.
Sequence in context: A105017 A083771 A158069 this_sequence A115617 A003064 A057429
Adjacent sequences: A039723 A039724 A039725 this_sequence A039727 A039728 A039729
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Harvey Dubner (harvey(AT)dubner.com)
|
|
EXTENSIONS
|
Corrected and extended by Ray Chandler (rayjchandler(AT)sbcglobal.net), Nov 06 2003
Further terms from Lei Zhou (lzhou5(AT)emory.edu), Dec 08 2005
|
|
|
Search completed in 0.002 seconds
|
