OFFSET
1,2
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..491
FORMULA
EXAMPLE
n = 10, a(10) = 10! because g(10!) = 1.
n = 9, a(9) = 45320 because 9! = 2*2*2*2*2*2*2*3*3*5*7 and g(9!) = 2, so a(9) = 9!/8.
MATHEMATICA
f[p_, e_] := If[OddQ[e] && e > 1, p^3, 1]; a[n_] := n! / (Times @@ f @@@ FactorInteger[n!]); Array[a, 20] (* Amiram Eldar, Sep 06 2020 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Labos Elemer, Aug 02 2000
STATUS
approved