A144726 Incorrect duplicate of A046966.

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

Author

Artur Jasinski, Sep 19 2008

Keywords

• dead

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.

Crossrefs

Cf. A046966, A046972, A144717, A144718, A144722, A144723, A144724, A144725, A144726, A144727, A144728, A144729, A144730, A144731.

Programs

Mathematica

k = 5; a = {}; Do[If[PrimeQ[k n + 1], k = k n; AppendTo[a, n]], {n, 1, 3000}]; a