|
|
A155018
|
|
Integer part of square root of n^15 = A010803(n).
|
|
6
|
|
|
0, 1, 181, 3787, 32768, 174692, 685700, 2178889, 5931641, 14348907, 31622776, 64631634, 124125023, 226242995, 394421215, 661735513, 1073741824, 1691869691, 2597429617, 3896296578, 5724334022, 8253624572, 11699575548, 16328969210
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
LINKS
|
|
|
MATHEMATICA
|
a={}; Do[AppendTo[a, IntegerPart[(n^15)^(1/2)]], {n, 0, 5!}]; a
Table[Floor[Sqrt[n^15]], {n, 1, 30}] (* G. C. Greubel, Dec 30 2017 *)
|
|
PROG
|
(PARI) for(n=1, 30, print1(floor(sqrt(n^15)), ", ")) \\ G. C. Greubel, Dec 30 2017
(Magma) [Floor(Sqrt(n^15)): n in [1..30]]; // G. C. Greubel, Dec 30 2017
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|