A018037 Powers of cube root of 21 rounded to nearest integer.
1, 3, 8, 21, 58, 160, 441, 1217, 3357, 9261, 25550, 70492, 194481, 536558, 1480324, 4084101, 11267725, 31086799, 85766121, 236622225, 652822777, 1801088541, 4969066720, 13709278307, 37822859361, 104350401111, 287894844440, 794280046581, 2191358423329
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), A017986 (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), this sequence (k=21), A018040 (k=22), A018043 (k=23), A018046 (k=24).
Programs
-
Magma
[Round(21^(n/3)): n in [0..40]]; // Vincenzo Librandi, Jan 08 2014
-
Mathematica
Table[Round[21^(n/3)], {n, 0, 40}] (* Vincenzo Librandi, Jan 08 2014 *)
Extensions
More terms from Vincenzo Librandi, Jan 08 2014