A094351 Rearrangement of integers such that a(0)!*a(1)!*...*a(n)! + 1 is prime.

0, 1, 2, 3, 6, 9, 10, 7, 29, 4, 45, 84, 12, 78, 182, 20, 21, 484, 668, 832, 556, 2033, 1437, 626

Offset

0,3

Comments

Next term is greater than 4000. - Sean A. Irvine, Apr 04 2011

Links

Table of n, a(n) for n=0..23.

Example

a(4) = 6 as 1!*2!*3!*6! + 1 = 8641 is a prime but 1!*2!*3!*4! + 1 = 289 is not.

Mathematica

v={0}; Print[0]; Do[a=Product[v[[k]]!, {k, n}]; For[m=1, MemberQ[v, m] ||!PrimeQ[1 + m!a], m++ ]; AppendTo[v, m]; Print[m], {n, 19}] (* Farideh Firoozbakht, Oct 19 2006 *)

Crossrefs

Cf. A094352.

Sequence in context: A189968 A097108 A140783 * A061910 A344208 A007086

Adjacent sequences: A094348 A094349 A094350 * A094352 A094353 A094354

Keyword

nonn,more

Author

Amarnath Murthy, May 22 2004

Extensions

More terms from Farideh Firoozbakht, Oct 19 2006

Corrected and extended by Sean A. Irvine and Farideh Firoozbakht, Apr 04 2011

Name clarified by Jinyuan Wang, Mar 03 2020

Status

approved