login
A033661
Trajectory of 31 under map x->x + (x-with-digits-reversed).
0
31, 44, 88, 176, 847, 1595, 7546, 14003, 44044, 88088, 176176, 847847, 1596595, 7553546, 14007103, 44177144, 88354288, 176599676, 853595347, 1597190705, 6668108656, 13236127322, 35608290553, 71117571206
OFFSET
0,1
FORMULA
a(n) = A033654(n-1) = A033652(n+1), n>1. [From R. J. Mathar, Oct 22 2008]
MATHEMATICA
NestList[#+IntegerReverse[#]&, 31, 30] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Nov 23 2016 *)
CROSSREFS
Sequence in context: A227622 A020348 A033905 * A219243 A046047 A014313
KEYWORD
nonn,base
AUTHOR
STATUS
approved