|
|
A157254
|
|
a(n) = floor(n^(n^(1/3))).
|
|
1
|
|
|
1, 2, 4, 9, 15, 25, 41, 64, 96, 142, 207, 295, 416, 578, 795, 1081, 1458, 1948, 2583, 3400, 4445, 5774, 7457, 9576, 12234, 15554, 19683, 24798, 31113, 38882, 48409, 60055, 74248, 91494, 112395, 137656, 168110, 204735, 248677, 301278, 364107
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
MATHEMATICA
|
lst={}; Do[nx=n^(1/3); AppendTo[lst, Floor[n^nx]], {n, 5!}]; lst
|
|
PROG
|
(PARI) for(n=1, 30, print1(floor(n^(n^(1/3))), ", ")) \\ G. C. Greubel, Feb 04 2018
(Magma) [Floor(n^(n^(1/3))): n in [1..30]]; // G. C. Greubel, Feb 04 2018
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|