|
%I #13 Sep 08 2022 08:45:40
%S 0,1,362,11363,131072,873464,4114202,15252229,47453132,129140163,
%T 316227766,710947978,1489500287,2941158941,5521897022,9926032708,
%U 17179869184,28761784747,46753733110,74029634996,114486680447
%N Integer part of square root of n^17 = A010805(n).
%H Alois P. Heinz, <a href="/A155019/b155019.txt">Table of n, a(n) for n = 0..1000</a>
%t a={};Do[AppendTo[a,IntegerPart[(n^17)^(1/2)]],{n,0,5!}];a
%t Table[Floor[Sqrt[n^17]], {n,0,30}] (* _G. C. Greubel_, Dec 30 2017 *)
%o (PARI) for(n=0,30, print1(floor(sqrt(n^17)), ", ")) \\ _G. C. Greubel_, Dec 30 2017
%o (Magma) [Floor(Sqrt(n^17)): n in [0..30]]; // _G. C. Greubel_, Dec 30 2017
%Y 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).
%K nonn
%O 0,3
%A _Vladimir Joseph Stephan Orlovsky_, Jan 19 2009
%E Offset corrected by _Alois P. Heinz_, Sep 27 2014
|
