[go: up one dir, main page]

login
A144726
Incorrect duplicate of A046966.
12
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
OFFSET
1,1
COMMENTS
Previous name was: a(n) is the smallest integer greater than a(n-1) such that a(1)*a(2)*...*a(n) + 1 is prime.
MATHEMATICA
k = 5; a = {}; Do[If[PrimeQ[k n + 1], k = k n; AppendTo[a, n]], {n, 1, 3000}]; a
KEYWORD
dead
AUTHOR
Artur Jasinski, Sep 19 2008
STATUS
approved