OFFSET
0,2
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..200
MATHEMATICA
Floor[(Power[13, (3)^-1])^Range[0, 40]] (* Harvey P. Dale, Mar 18 2011 *)
Table[Floor[13^(n/3)], {n, 0, 40}] (* Vincenzo Librandi, Jan 06 2014 *)
Floor[CubeRoot[13]^Range[0, 40]] (* Harvey P. Dale, Jun 01 2024 *)
PROG
(Magma) [Floor(13^(n/3)): n in [0..40]]; // Vincenzo Librandi, Jan 06 2014
CROSSREFS
Cf. powers of cube root of k rounded down: A017979 (k=2), A017982 (k=3), A017985 (k=4), A017988 (k=5), A017991 (k=6), A017994 (k=7), A018000 (k=9), A018003 (k=10), A018006 (k=11), A018009 (k=12), this sequence (k=13), A018015 (k=14), A018018 (k=15), A018021 (k=16), A018024 (k=17), A018027 (k=18), A018030 (k=19), A018033 (k=20), A018036 (k=21), A018039 (k=22), A018042 (k=23), A018045 (k=24).
KEYWORD
nonn
AUTHOR
EXTENSIONS
More terms from Vincenzo Librandi, Jan 06 2014
STATUS
approved