|
|
A155016
|
|
Integer part of square root of A010801.
|
|
6
|
|
|
0, 1, 90, 1262, 8192, 34938, 114283, 311269, 741455, 1594323, 3162277, 5875603, 10343751, 17403307, 28172943, 44115700, 67108864, 99521746, 144301645, 205068240, 286216701, 393029741, 531798888, 709955183, 936209559, 1220703125
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
LINKS
|
|
|
MATHEMATICA
|
a={}; Do[AppendTo[a, IntegerPart[(n^13)^(1/2)]], {n, 0, 5!}]; a
Table[Floor[Sqrt[n^13]], {n, 1, 30}] (* G. C. Greubel, Dec 30 2017 *)
|
|
PROG
|
(PARI) for(n=1, 30, print1(floor(sqrt(n^13)), ", ")) \\ G. C. Greubel, Dec 30 2017
(Magma) [Floor(Sqrt(n^13)): n in [1..30]]; // G. C. Greubel, Dec 30 2017
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|