A090704 Numbers n such that n*factorial(n)-1 is prime.

2, 3, 5, 7, 8, 11, 27, 77, 98, 183, 285, 290, 397, 410, 599, 717, 731, 888, 1962, 2239, 2241, 2532, 8799, 11402

Offset

1,1

Links

Table of n, a(n) for n=1..24.

Formula

a(n) = A049433(n)-1 because n!-(n-1)!-1 = (n-1)*(n-1)!-1.

Mathematica

Select[Range[2600], PrimeQ[#(#!)-1]&] (* Because a(22) generates a 7524 digit number to be tested for primality, the program takes a long time to run. *) (* Harvey P. Dale, May 27 2014 *)

Crossrefs

Sequence in context: A300163 A352204 A224858 * A112055 A291485 A228898

Adjacent sequences: A090701 A090702 A090703 * A090705 A090706 A090707

Keyword

nonn,more

Author

Mohammed Bouayoun (bouyao(AT)wanadoo.fr), Jan 15 2004

Extensions

More terms from Farideh Firoozbakht, Oct 31 2004

a(23)-a(24) using A049433 from Michel Marcus, May 29 2014

Status

approved