login
A094351
Rearrangement of integers such that a(0)!*a(1)!*...*a(n)! + 1 is prime.
1
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
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
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