|
Search: id:A144724
|
|
|
| A144724 |
|
a(n)= smallest positive integer k such that a(0)*a(1)*a(2)*...*a(n) + 1 is prime. a(0)=4 |
|
+0
14
|
|
| 1, 3, 5, 7, 8, 9, 11, 12, 14, 17, 20, 24, 30, 34, 44, 72, 85, 86, 92, 115, 122, 125, 132, 142, 150, 161, 162, 181, 186, 198, 224, 248, 252, 282, 283, 290, 307, 319, 321, 344, 350, 376, 445, 476, 567, 623, 676, 682, 704, 741, 749, 786, 803, 806, 893, 1014, 1046, 1079
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
MATHEMATICA
|
k = 4; 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: A020884 A024352 A134407 this_sequence A060462 A072668 A062958
Adjacent sequences: A144721 A144722 A144723 this_sequence A144725 A144726 A144727
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Artur Jasinski (grafix(AT)csl.pl), Sep 19 2008
|
|
|
Search completed in 0.002 seconds
|
