|
|
A070794
|
|
Integers n such that the 'Reverse and Add!' trajectory of n joins the trajectory of 100.
|
|
2
|
|
|
100, 101, 103, 107, 188, 193, 200, 202, 206, 287, 292, 299, 301, 305, 386, 391, 398, 400, 404, 485, 490, 497, 503, 584, 596, 602, 683, 695, 701, 709, 782, 794, 800, 808, 881, 893, 907, 980, 992, 1034, 1069, 1076, 1124, 1159, 1166, 1214, 1249, 1256, 1291
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
The trajectory of 101 is part of the trajectory of 100; the trajectory of 485 joins the trajectory of 100 at 61105 after 5 steps.
|
|
MATHEMATICA
|
limit = 10^3; x = NestList[ # + IntegerReverse[#] &, 100, limit];
Select[Range[1291],
Intersection[NestList[ # + IntegerReverse[#] &, #, limit],
|
|
CROSSREFS
|
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|