A018166 Powers of fifth root of 18 rounded to nearest integer.

1, 2, 3, 6, 10, 18, 32, 57, 102, 182, 324, 578, 1030, 1835, 3272, 5832, 10396, 18532, 33036, 58889, 104976, 187130, 333579, 594639, 1060005, 1889568, 3368349, 6004426, 10703505, 19080095, 34012224, 60630274

Offset

0,2

Links

Chai Wah Wu, Table of n, a(n) for n = 0..1000

Mathematica

Round[Surd[18, 5]^Range[0, 40]] (* Harvey P. Dale, Jul 16 2016 *)

Prog

(Python)
from gmpy2 import iroot_rem
def A018166(n):
    i, j = iroot_rem(18**n, 5)
    return int(i) + int(32*j >= 10*i*(4*i*(2*i*(i + 1) + 1) + 1) + 1) # Chai Wah Wu, Aug 18 2016

Crossrefs

Sequence in context: A224342 A181649 A052972 * A144026 A054152 A240802

Adjacent sequences: A018163 A018164 A018165 * A018167 A018168 A018169

Keyword

nonn

Author

N. J. A. Sloane

Status

approved