login
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
OFFSET
0,3
LINKS
MATHEMATICA
a={}; Do[AppendTo[a, IntegerPart[(n^7)^(1/2)]], {n, 0, 5!}]; a
IntegerPart[(Sqrt[Range[0, 40]])^7] (* Harvey P. Dale, Jan 19 2016 *)
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
Cf. A001015 (n^7).
Sequence in context: A359096 A143059 A224142 * A006324 A372663 A256582
KEYWORD
nonn
AUTHOR
EXTENSIONS
Offset corrected by Alois P. Heinz, Sep 27 2014
STATUS
approved