OFFSET
0,3
LINKS
Rémy Sigrist, Table of n, a(n) for n = 0..10000
MAPLE
For Maple code see A265543.
PROG
(PARI) a(n, base=10) = { my (d=digits(n, base)); for (k=1, #d\2, d[k]=d[#d+1-k]=max(d[k], d[#d+1-k])); fromdigits(d, base) } \\ Rémy Sigrist, Jun 24 2022
CROSSREFS
KEYWORD
nonn,base
AUTHOR
N. J. A. Sloane, Dec 10 2015
STATUS
approved