A070793 - OEIS

A070793

Integers n such that the 'Reverse and Add!' trajectory of n joins the trajectory of 9.

%I #10 Oct 21 2019 02:35:28

%S 9,18,27,36,45,54,63,72,81,90,99,198,297,396,495,594,693,792,891,990,

%T 1017,1035,1044,1089,1107,1125,1134,1179,1215,1224,1269,1305,1314,

%U 1359,1404,1449,1539,1629,1719,1809,1899,1989,2016,2034,2043,2088,2106,2124

%N Integers n such that the 'Reverse and Add!' trajectory of n joins the trajectory of 9.

%H <a href="/index/Res#RAA">Index entries for sequences related to Reverse and Add!</a>

%e The trajectory of 18 is part of the trajectory of 9; the trajectory of 1215 joins the trajectory of 9 at 40293 after 3 steps.

%t limit = 10^3; x = NestList[ # + IntegerReverse[#] &, 9, limit];

%t Select[Range[2124],

%t Intersection[NestList[ # + IntegerReverse[#] &, #, limit],

%t x] != {} &] (* _Robert Price_, Oct 20 2019 *)

%Y Cf. A070788 - A070792, A070794 - A070798, A063049.

%K base,nonn

%O 1,1

%A _Klaus Brockhaus_, May 07 2002