OFFSET
0,1
MATHEMATICA
NestList[#+FromDigits[Reverse[IntegerDigits[#]]]&, 25, 30] (* Harvey P. Dale, Mar 27 2013 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
STATUS
approved