|
|
A066641
|
|
a(n) = floor(n^sqrt(n)).
|
|
1
|
|
|
1, 2, 6, 16, 36, 80, 172, 358, 729, 1453, 2843, 5475, 10384, 19427, 35890, 65536, 118377, 211675, 374936, 658238, 1145961, 1979340, 3393261, 5775991, 9765625, 16405018, 27389511, 45461160, 75033331, 123176061, 201164105, 326899345
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
EXAMPLE
|
a(5) = 36 as 5^(5^1/2)) = 36.5548026774732189429530238298972...
|
|
MATHEMATICA
|
Table[ Floor[n^Sqrt[n]], {n, 1, 35} ]
|
|
PROG
|
(PARI) { default(realprecision, 100); for (n=1, 300, write("b066641.txt", n, " ", floor(n^sqrt(n) + 10^-20)) ) } \\ Harry J. Smith, Mar 15 2010
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|