login
A062449
Integer part of log(n^n)^(1 + log(1 + log(n))).
1
0, 0, 1, 7, 24, 59, 123, 228, 393, 634, 976, 1444, 2066, 2877, 3912, 5212, 6820, 8786, 11161, 14002, 17370, 21331, 25953, 31312, 37486, 44560, 52623, 61767, 72093, 83705, 96711, 111226, 127371, 145270, 165056, 186864, 210838, 237125, 265881
OFFSET
0,4
MATHEMATICA
Join[{0}, Table[Floor[Log[n^n]^(1+Log[1+Log[n]])], {n, 40}]] (* Harvey P. Dale, Aug 14 2018 *)
CROSSREFS
Cf. A062450.
Sequence in context: A081436 A024205 A008779 * A014205 A002969 A029585
KEYWORD
nonn,easy
AUTHOR
Olivier Gérard, Jun 23 2001
EXTENSIONS
Mathematica program replaced by Harvey P. Dale, Aug 14 2018
STATUS
approved