A155014 a(n) = floor(sqrt(n^7)).
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
Keywords
Links
- Alois P. Heinz, Table of n, a(n) for n = 0..1000
Crossrefs
Cf. A001015 (n^7).
Programs
-
Magma
[Floor(Sqrt(n^7)): n in [0..30]]; // G. C. Greubel, Dec 30 2017
-
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 *)
-
PARI
for(n=1,30, print1(floor(sqrt(n^7)), ", ")) \\ G. C. Greubel, Dec 30 2017
Extensions
Offset corrected by Alois P. Heinz, Sep 27 2014