A037152 Smallest prime > n!+1.

3, 5, 11, 29, 127, 727, 5051, 40343, 362897, 3628811, 39916817, 479001629, 6227020867, 87178291219, 1307674368043, 20922789888023, 355687428096031, 6402373705728037, 121645100408832089, 2432902008176640029

Offset: 1

Author

Jud McCranie

Keywords

• nonn

Comments

Main entry for this sequence is A037153.

Links

• Vincenzo Librandi, Table of n, a(n) for n = 1..100

Crossrefs

Cf. A000142, A037153, A038507, A151800.

Programs

Mathematica

NextPrime[Range[20]!+1] (* Harvey P. Dale, Apr 08 2012 *)

Maxima

makelist(next_prime(n!+1), n,  1, 20); /* Bruno Berselli, May 20 2011 */

PARI

for(n=1,100,print1(nextprime(n!+2),", ")); /* Joerg Arndt, May 21 2011 */

Formula

a(n) = A151800(A000142(n)+1) = A000142(n) + A037153(n).

a(n) = A151800(A038507(n)). - Michel Marcus, Feb 18 2024

Extensions

Extended by Ray Chandler, Mar 07 2010