|
Search: id:A091771
|
|
|
| A091771 |
|
a(0) = 2; for n > 0, a(n) is the least prime of the form k*n*a(n-1) +1. |
|
+0
4
|
|
| 2, 3, 7, 43, 173, 3461, 62299, 6977489, 55819913, 8038067473, 241142024191, 15915373596607, 2291813797911409, 476697269965573073, 20021285338554069067, 10811494082819197296181, 4670565443777893231950193
(list; graph; listen)
|
|
|
OFFSET
|
0,1
|
|
|
MATHEMATICA
|
a[0] = 2; a[n_] := a[n] = Block[{k = 1}, While[ !PrimeQ[k*n*a[n - 1] + 1], k++ ]; k*n*a[n - 1] + 1]; Table[ a[n], {n, 0, 16}] (from Robert G. Wilson v Feb 13 2004)
|
|
CROSSREFS
|
Cf. A091879.
Sequence in context: A085682 A083369 A000946 this_sequence A072714 A051786 A133400
Adjacent sequences: A091768 A091769 A091770 this_sequence A091772 A091773 A091774
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Feb 11 2004
|
|
EXTENSIONS
|
More terms from Ray Chandler (rayjchandler(AT)sbcglobal.net), Robert G. Wilson v (rgwv(AT)rgwv.com) and Rick L. Shepherd (rshepherd2(AT)hotmail.com), Feb 12 2004
|
|
|
Search completed in 0.002 seconds
|
