login
A147772
Floor[(n^n)^(1/3)].
1
1, 1, 3, 6, 14, 36, 93, 256, 729, 2154, 6583, 20736, 67156, 223150, 759375, 2642245, 9387368, 34012224, 125537306, 471556031, 1801088541, 6989288906, 27536796142, 110075314176, 446169698823, 1832746290156, 7625597484987, 32122422687591
OFFSET
1,3
LINKS
MATHEMATICA
lst={}; Do[AppendTo[lst, Floor[(n^n)^(1/3)]], {n, 50}]; lst
Table[Floor[Surd[n^n, 3]], {n, 30}] (* Harvey P. Dale, Jun 07 2022 *)
CROSSREFS
Sequence in context: A350678 A332362 A196479 * A129703 A001550 A197461
KEYWORD
nonn
AUTHOR
STATUS
approved