|
|
A155014
|
|
a(n) = floor(sqrt(n^7)).
|
|
8
|
|
|
0, 1, 11, 46, 128, 279, 529, 907, 1448, 2187, 3162, 4414, 5985, 7921, 10267, 13071, 16384, 20256, 24743, 29897, 35777, 42439, 49943, 58350, 67723, 78125, 89620, 102275, 116159, 131338, 147885, 165869, 185363, 206442, 229179, 253651, 279936
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
LINKS
|
|
|
MATHEMATICA
|
a={}; Do[AppendTo[a, IntegerPart[(n^7)^(1/2)]], {n, 0, 5!}]; a
Table[Floor[Sqrt[n^7]], {n, 0, 30}] (* G. C. Greubel, Dec 30 2017 *)
|
|
PROG
|
(PARI) for(n=1, 30, print1(floor(sqrt(n^7)), ", ")) \\ G. C. Greubel, Dec 30 2017
(Magma) [Floor(Sqrt(n^7)): n in [0..30]]; // G. C. Greubel, Dec 30 2017
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|