A062435 Integer part of log(n!)^log(log(1 + n)).
0, 1, 1, 2, 3, 4, 6, 8, 10, 13, 16, 20, 24, 29, 35, 41, 48, 56, 64, 74, 84, 95, 107, 121, 135, 150, 167, 185, 204, 225, 247, 270, 295, 321, 349, 379, 410, 443, 478, 515, 554, 594, 637, 682, 729, 778, 830, 883, 940, 998, 1060, 1123, 1190, 1259, 1331, 1406
Offset: 2
Programs
-
Mathematica
Floor[Log[n! ]^Log[Log[1 + n]]]
-
PARI
a(n) = floor(log(n!)^log(log(1 + n))); \\ Michel Marcus, Jun 24 2015