OFFSET
1,1
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1500
MATHEMATICA
a[n_] := GCD[(2n)! + 1, n! + 1]; Select[ Table[ a[n], {n, 1, 1000}], # != 1 &] (* Jean-François Alcover, Dec 16 2011 *)
Table[GCD[(2n)!+1, n!+1], {n, 700}]/.(1->Nothing) (* Harvey P. Dale, Jan 12 2020 *)
CROSSREFS
KEYWORD
nonn,nice
AUTHOR
Benoit Cloitre, Feb 04 2002
STATUS
approved