|
|
A074182
|
|
Largest power of n <= n!.
|
|
6
|
|
|
1, 2, 3, 16, 25, 216, 2401, 32768, 59049, 1000000, 19487171, 429981696, 815730721, 20661046784, 576650390625, 17592186044416, 34271896307633, 1156831381426176, 42052983462257059, 1638400000000000000
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
FORMULA
|
a(n) = n^floor(log_n(n!)) for n>1.
(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
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|