A062415 - OEIS

The OEIS is supported by the many generous donors to the OEIS Foundation.

A062415

Integer part of log(n)^(n - 1).

1

1, 0, 1, 2, 6, 18, 54, 168, 543, 1819, 6284, 22305, 81085, 301185, 1140759, 4398268, 17237268, 68582448, 276723505, 1131245762, 4681484414, 19597666672, 82933899715, 354575503930, 1530739734801, 6669583434025, 29316248173094

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,4

LINKS

Table of n, a(n) for n=1..27.

MATHEMATICA

Join[{1}, Table[Floor[Log[n]^((1-1/n)*n)], {n, 2, 30}]]

CROSSREFS

Sequence in context: A192338 A114464 A007206 * A363432 A086680 A275872

Adjacent sequences: A062412 A062413 A062414 * A062416 A062417 A062418

KEYWORD

nonn,easy

AUTHOR

Olivier Gérard, Jun 23 2001

EXTENSIONS

Mathematica program fixed by Harvey P. Dale, Apr 23 2020

STATUS

approved