A043070 a(n)=(s(n)+2)/8, where s(n)=n-th base 8 palindrome that starts with 6 (in base 8), written in decimal digits.
1, 7, 49, 50, 51, 52, 53, 54, 55, 56, 385, 394, 403, 412, 421, 430, 439, 448, 3073, 3081, 3089, 3097, 3105, 3113, 3121, 3129, 3138, 3146, 3154, 3162, 3170, 3178, 3186, 3194, 3203, 3211, 3219, 3227, 3235, 3243, 3251, 3259
Offset: 1
Programs
-
Mathematica
(#+2)/8&/@Select[Range[30000],IntegerDigits[#,8][[1]]==6&&IntegerDigits[#,8] == Reverse[ IntegerDigits[#,8]]&] (* Harvey P. Dale, May 07 2022 *)
Extensions
Definition clarified by Harvey P. Dale, May 07 2022