A070797 Integers n such that the 'Reverse and Add!' trajectory of n joins the trajectory of 108.
108, 126, 144, 153, 162, 171, 180, 189, 207, 225, 243, 252, 261, 270, 279, 288, 306, 324, 342, 351, 360, 378, 387, 405, 423, 441, 450, 477, 486, 504, 522, 540, 549, 576, 585, 603, 621, 648, 675, 684, 702, 720, 747, 774, 783, 801, 846, 873, 882, 900, 909
Offset: 1
Examples
The trajectory of 909 is part of the trajectory of 108; the trajectory of 126 joins the trajectory of 108 at 4069593 after 12 steps.
Programs
-
Mathematica
limit = 10^3; x = NestList[ # + IntegerReverse[#] &, 108, limit]; Select[Range[909], Intersection[NestList[ # + IntegerReverse[#] &, #, limit], x] != {} &] (* Robert Price, Oct 20 2019 *)
Comments