|
Search: id:A144726
|
|
|
| A144726 |
|
a(n)= smallest positive integer k such that a(0)*a(1)*a(2)*...*a(n) + 1 is prime. a(0)=5 |
|
+0
13
|
|
| 2, 3, 5, 7, 10, 12, 14, 15, 19, 21, 26, 29, 30, 39, 41, 56, 62, 77, 96, 105, 112, 113, 115, 121, 136, 145, 159, 168, 188, 236, 240, 258, 281, 305, 324, 362, 376, 422, 521, 588, 639, 643, 652, 695, 698, 737, 770, 776, 784, 806, 807, 809, 818, 959, 1023, 1060, 1071
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
MATHEMATICA
|
k = 5; a = {}; Do[If[PrimeQ[k n + 1], k = k n; AppendTo[a, n]], {n, 1, 3000}]; a (*Artur Jasinski*)
|
|
CROSSREFS
|
A046966, A046972, A144717, A144718, A144722, A144723, A144724, A144725, A144726, A144727, A144728, A144729, A144730, A144731
Sequence in context: A058590 A064627 A117286 this_sequence A123885 A010062 A119565
Adjacent sequences: A144723 A144724 A144725 this_sequence A144727 A144728 A144729
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Artur Jasinski (grafix(AT)csl.pl), Sep 19 2008
|
|
|
Search completed in 0.002 seconds
|
