OFFSET
1,1
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
MATHEMATICA
b83Q[n_]:=With[{id8=IntegerDigits[n, 8]}, id8==Reverse[id8]&&id8[[1]]==3]; Select[Range[14000], b83Q] (* Harvey P. Dale, Dec 01 2024 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
STATUS
approved
