Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A070792
Integers n such that the 'Reverse and Add!' trajectory of n joins the trajectory of 7.
2
7, 14, 19, 23, 28, 29, 32, 37, 38, 41, 46, 47, 49, 50, 55, 56, 58, 64, 65, 67, 73, 74, 76, 82, 83, 85, 89, 91, 92, 94, 98, 110, 121, 136, 143, 187, 220, 235, 242, 286, 334, 341, 385, 433, 440, 484, 532, 569, 583, 631, 668, 682, 719, 730, 767, 781, 818, 866, 869
OFFSET
1,1
EXAMPLE
The trajectory of 14 is part of the trajectory of 7; the trajectory of 235 joins the trajectory of 7 at 8872688 after 13 steps.
MATHEMATICA
limit = 10^3; x = NestList[ # + IntegerReverse[#] &, 7, limit];
Select[Range[869],
Intersection[NestList[ # + IntegerReverse[#] &, #, limit],
x] != {} &] (* Robert Price, Oct 20 2019 *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Klaus Brockhaus, May 07 2002
STATUS
approved