login
Integer part of log(n!)^(1 + log(1 + log(1 + n))).
1

%I #7 Jan 31 2024 17:27:54

%S 0,0,0,2,9,23,50,94,164,269,418,623,899,1262,1728,2317,3051,3953,5049,

%T 6368,7939,9796,11973,14508,17441,20815,24676,29071,34052,39672,45988,

%U 53060,60950,69723,79450,90200,102050,115078,129366,144998,162063

%N Integer part of log(n!)^(1 + log(1 + log(1 + n))).

%t Table[Floor[Log[n!]^(1+Log[1+Log[1+n]])],{n,0,40}] (* _Harvey P. Dale_, Jan 31 2024 *)

%Y Cf. A062446.

%K nonn,easy

%O 0,4

%A _Olivier GĂ©rard_, Jun 23 2001

%E Previous Mathematica program replaced by _Harvey P. Dale_, Jan 31 2024