A018014 Powers of cube root of 13 rounded up.
1, 3, 6, 13, 31, 72, 169, 398, 935, 2197, 5166, 12147, 28561, 67157, 157908, 371293, 873035, 2052796, 4826809, 11349444, 26686341, 62748517, 147542765, 346922421, 815730721, 1918055941, 4509991466, 10604499373, 24934727222, 58629889046, 137858491849
Offset: 0
Keywords
Links
- Vincenzo Librandi, Table of n, a(n) for n = 0..200
Crossrefs
Cf. powers of cube root of k ceiling up: A017981 (k=2), A017984 (k=3), A017987 (k=4), A017990 (k=5), A017993 (k=6), A017996 (k=7), A018002 (k=9), A018005 (k=10), A018008 (k=11), A018011 (k=12), this sequence (k=13), A018017 (k=14), A018020 (k=15), A018023 (k=16), A018026 (k=17), A018029 (k=18), A018032 (k=19), A018035 (k=20), A018038 (k=21), A018041 (k=22), A018044 (k=23), A018047 (k=24).
Programs
-
Magma
[Ceiling(13^(n/3)): n in [0..40]]; // Vincenzo Librandi, Jan 09 2014
-
Mathematica
Ceiling[Surd[13,3]^Range[0,30]] (* Harvey P. Dale, Nov 06 2013 *) Table[Ceiling[13^(n/3)], {n, 0, 40}] (* Vincenzo Librandi, Jan 09 2014 *)
Extensions
More terms from Vincenzo Librandi, Jan 09 2014