login
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
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
Integer part of square root of n^k: A000196 (k=1), A000093 (k=3), A155013 (k=5), A155014 (k=7), A155015 (k=11), A155016 (k=13), A155018 (k=15), this sequence (k=17).
Sequence in context: A158310 A031716 A243131 * A020539 A157442 A200558
KEYWORD
nonn
AUTHOR
EXTENSIONS
Offset corrected by Alois P. Heinz, Sep 27 2014
STATUS
approved