A062449 Integer part of log(n^n)^(1 + log(1 + log(n))).

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

Links

Table of n, a(n) for n=0..38.

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

Adjacent sequences: A062446 A062447 A062448 * A062450 A062451 A062452

Keyword

nonn,easy

Author

Olivier Gérard, Jun 23 2001

Extensions

Mathematica program replaced by Harvey P. Dale, Aug 14 2018

Status

approved