%I #16 Jun 01 2024 17:57:22
%S 1,2,5,13,30,71,169,397,934,2197,5165,12146,28561,67156,157907,371293,
%T 873034,2052795,4826809,11349443,26686340,62748517,147542764,
%U 346922420,815730721,1918055940,4509991465,10604499373,24934727221,58629889045,137858491849
%N Powers of cube root of 13 rounded down.
%H Vincenzo Librandi, <a href="/A018012/b018012.txt">Table of n, a(n) for n = 0..200</a>
%t Floor[(Power[13, (3)^-1])^Range[0, 40]] (* _Harvey P. Dale_, Mar 18 2011 *)
%t Table[Floor[13^(n/3)], {n, 0, 40}] (* _Vincenzo Librandi_, Jan 06 2014 *)
%t Floor[CubeRoot[13]^Range[0,40]] (* _Harvey P. Dale_, Jun 01 2024 *)
%o (Magma) [Floor(13^(n/3)): n in [0..40]]; // _Vincenzo Librandi_, Jan 06 2014
%Y 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).
%K nonn
%O 0,2
%A _N. J. A. Sloane_
%E More terms from _Vincenzo Librandi_, Jan 06 2014