A194130 a(n) = n!/gcd(n,3).
1, 2, 2, 24, 120, 240, 5040, 40320, 120960, 3628800, 39916800, 159667200, 6227020800, 87178291200, 435891456000, 20922789888000, 355687428096000, 2134124568576000, 121645100408832000, 2432902008176640000, 17030314057236480000, 1124000727777607680000
Offset: 1
Keywords
Programs
-
Maple
A194130 := proc(n) n!/igcd(n,3) ; end proc: seq(A194130(n),n=1..30) ;
-
Mathematica
Table[n!/GCD[n,3],{n,20}] (* Harvey P. Dale, Aug 08 2019 *)
Extensions
Definition and offset corrected by R. J. Mathar, Aug 18 2011