A018010 Powers of cube root of 12 rounded to nearest integer.

1, 2, 5, 12, 27, 63, 144, 330, 755, 1728, 3956, 9057, 20736, 47474, 108687, 248832, 569683, 1304249, 2985984, 6836197, 15650984, 35831808, 82034362, 187811805, 429981696, 984412343, 2253741659, 5159780352, 11812948115, 27044899907, 61917364224

Offset: 0

Author

N. J. A. Sloane

Keywords

• nonn

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), this sequence (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).

Programs

Magma

[Round(12^(n/3)): n in [0..40]]; // Vincenzo Librandi, Jan 08 2014

Mathematica

Table[Round[12^(n/3)], {n, 0, 40}] (* Vincenzo Librandi, Jan 08 2014 *)

Python

from sympy import integer_nthroot
def A018010(n): return -integer_nthroot(m:=3**n<<(n<<1),3)[0]+integer_nthroot(m<<3,3)[0] # Chai Wah Wu, Jun 18 2024

Extensions

More terms from Vincenzo Librandi, Jan 08 2014