A017986 Powers of cube root of 4 rounded to nearest integer.
1, 2, 3, 4, 6, 10, 16, 25, 40, 64, 102, 161, 256, 406, 645, 1024, 1625, 2580, 4096, 6502, 10321, 16384, 26008, 41285, 65536, 104032, 165140, 262144, 416128, 660561, 1048576, 1664511, 2642246, 4194304, 6658043, 10568984, 16777216, 26632170, 42275935
Offset: 0
Keywords
Links
- Vincenzo Librandi, Table of n, a(n) for n = 0..200
Crossrefs
Cf. powers of cube root of k rounded up: A017980 (k=2), A017983 (k=3), this sequence (k=4), A017989 (k=5), A017992 (k=6), A017995 (k=7), A018001 (k=9), A018004 (k=10), A018007 (k=11), A018010 (k=12), A018013 (k=13), A018016 (k=14), A018019 (k=15), A018022 (k=16), A018025 (k=17), A018028 (k=18), A018031 (k=19), A018034 (k=20), A018037 (k=21), A018040 (k=22), A018043 (k=23), A018046 (k=24).
Programs
-
Magma
[Round(4^(n/3)): n in [0..50]]; // Vincenzo Librandi, Jan 07 2014
-
Mathematica
Table[Round[4^(n/3)], {n, 0, 40}] (* Vincenzo Librandi, Jan 07 2014 *) Round[Surd[4,3]^Range[0,40]] (* Harvey P. Dale, Jan 02 2017 *) -
PARI
vector(50, n, n--; round(4^(n/3))) \\ Altug Alkan, Nov 25 2015
Extensions
More terms from Vincenzo Librandi, Jan 07 2014