login
A062452
Nearest integer to log(n^n)^(1 + log(1 + log(1 + n))).
1
0, 0, 2, 9, 29, 68, 140, 257, 437, 699, 1068, 1569, 2232, 3093, 4187, 5556, 7246, 9305, 11787, 14750, 18255, 22370, 27164, 32714, 39100, 46407, 54725, 64150, 74781, 86724, 100089, 114993, 131557, 149908, 170178, 192505, 217035, 243915
OFFSET
0,3
MATHEMATICA
Join[{0}, Table[Round[Log[n^n]^(1+Log[1+Log[1+n]])], {n, 40}]] (* Harvey P. Dale, Sep 15 2021 *)
CROSSREFS
Cf. A062451.
Sequence in context: A090208 A123058 A212272 * A265440 A152891 A181545
KEYWORD
nonn,easy
AUTHOR
Olivier Gérard, Jun 23 2001
EXTENSIONS
Previous Mathematica program replaced by Harvey P. Dale, Sep 15 2021
STATUS
approved