OFFSET
1,2
LINKS
Alois P. Heinz, Table of n, a(n) for n = 1..400
FORMULA
From Danny Rorabaugh, Apr 14 2015: (Start)
a(n) = n^floor(log_n(n!)) for n>1.
a(n) = A074181(n)/n for n>2.
(End)
PROG
(Sage) [1] + [n^(floor(log(factorial(n))/log(n))) for n in range(2, 21)] # Danny Rorabaugh, Apr 14 2015
(Magma) [1] cat [n^Floor(Log(Factorial(n)) / Log(n)): n in [2..25]]; // Vincenzo Librandi, Apr 15 2015
(PARI) a(n)=if(n>3, n^logint(n!, n), n) \\ Charles R Greathouse IV, Oct 11 2015
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Amarnath Murthy, Aug 31 2002
EXTENSIONS
More terms from Jason Earls, Sep 02 2002
STATUS
approved