|
%I #13 Aug 04 2023 15:26:23
%S 1,2,4,7,13,26,49,94,179,343,656,1255,2401,4593,8786,16807,32151,
%T 61502,117649,225054,430514,823543,1575381,3013596,5764801,11027668,
%U 21095169,40353607,77193673,147666185,282475249,540355712,1033663292,1977326743,3782489985
%N Powers of cube root of 7 rounded to nearest integer.
%H Vincenzo Librandi, <a href="/A017995/b017995.txt">Table of n, a(n) for n = 0..200</a>
%t Table[Round[7^(n/3)], {n, 0, 50}] (* _Vincenzo Librandi_, Jan 07 2014 *)
%t Round[CubeRoot[7]^Range[0,40]] (* _Harvey P. Dale_, Aug 04 2023 *)
%o (Magma) [Round(7^(n/3)): n in [0..50]]; // _Vincenzo Librandi_, Jan 07 2014
%Y Cf. powers of cube root of k rounded up: A017980 (k=2), A017983 (k=3), A017986 (k=4), A017989 (k=5), A017992 (k=6), tjis sequence (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).
%K nonn
%O 0,2
%A _N. J. A. Sloane_
%E More terms from _Vincenzo Librandi_, Jan 07 2014
|
