A018151 Powers of fifth root of 13 rounded to nearest integer.

1, 2, 3, 5, 8, 13, 22, 36, 61, 101, 169, 282, 471, 788, 1315, 2197, 3670, 6129, 10238, 17100, 28561, 47705, 79680, 133088, 222294, 371293, 620162, 1035843, 1730146, 2889824, 4826809, 8062111, 13465964

Offset

0,2

Links

Paolo Xausa, Table of n, a(n) for n = 0..1000

Mathematica

Round[(13^(1/5))^Range[0, 50]] (* Paolo Xausa, Jun 22 2024 *)

Prog

(Python)
from gmpy2 import iroot_rem
def A018151(n):
    i, j = iroot_rem(13**n, 5)
    return int(i)+int(j<<5>=10*i*((i*((i*(i+1)<<1)+1)<<2)+1)+1) # Chai Wah Wu, Jun 20 2024

Crossrefs

Cf. A011098.

Sequence in context: A245271 A206743 A186085 * A227374 A124429 A306215

Adjacent sequences: A018148 A018149 A018150 * A018152 A018153 A018154

Keyword

nonn

Author

N. J. A. Sloane

Status

approved