|
|
A155019
|
|
Integer part of square root of n^17 = A010805(n).
|
|
6
|
|
|
0, 1, 362, 11363, 131072, 873464, 4114202, 15252229, 47453132, 129140163, 316227766, 710947978, 1489500287, 2941158941, 5521897022, 9926032708, 17179869184, 28761784747, 46753733110, 74029634996, 114486680447
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
LINKS
|
|
|
MATHEMATICA
|
a={}; Do[AppendTo[a, IntegerPart[(n^17)^(1/2)]], {n, 0, 5!}]; a
Table[Floor[Sqrt[n^17]], {n, 0, 30}] (* G. C. Greubel, Dec 30 2017 *)
|
|
PROG
|
(PARI) for(n=0, 30, print1(floor(sqrt(n^17)), ", ")) \\ G. C. Greubel, Dec 30 2017
(Magma) [Floor(Sqrt(n^17)): n in [0..30]]; // G. C. Greubel, Dec 30 2017
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|