A118599 Palindromes in base 8 (written in base 8).

0, 1, 2, 3, 4, 5, 6, 7, 11, 22, 33, 44, 55, 66, 77, 101, 111, 121, 131, 141, 151, 161, 171, 202, 212, 222, 232, 242, 252, 262, 272, 303, 313, 323, 333, 343, 353, 363, 373, 404, 414, 424, 434, 444, 454, 464, 474, 505, 515, 525, 535, 545, 555, 565, 575, 606, 616

Offset: 1

Author

Martin Renner, May 08 2006

Keywords

• nonn
• base

Crossrefs

Cf. A029803, A057148, A118594, A118595, A118596, A118597, A118598, A118599, A118600, A002113.

Programs

Mathematica

(* get NextPalindrome from A029965 *) Select[NestList[NextPalindrome, 0, 70], Max@IntegerDigits@# < 8 &] (* Robert G. Wilson v, May 09 2006 *)

Python

def A118599(n):
    if n == 1: return 0
    y = (x:=1<<(m:=n.bit_length()-2)-m%3)<<3
    return int((s:=oct(n-x)[2:])+s[-2::-1] if nChai Wah Wu, Jun 14 2024

Extensions

More terms from Robert G. Wilson v, May 09 2006