A113702 Trajectory of 10 under map k -> A111273(k).
10, 11, 22, 23, 12, 13, 91, 161, 189, 285, 429, 473, 869, 957, 1437, 2157, 3237, 4857, 7287, 4164, 3470, 4511, 2256, 1464, 1172, 782, 783, 392, 294, 413, 531, 342, 343, 172, 173, 519, 346, 347, 694, 1735, 1388, 926, 927, 464, 248, 166, 167, 84, 70, 71, 36, 37
Offset: 0
Keywords
Links
- Robert Israel, Table of n, a(n) for n = 0..81
Programs
-
Maple
# assuming A111273 is a list, Vector or table a113702[0]:= 10: for i from 1 do t:= traperror(A111273[a113702[i-1]]); if not t::integer then break fi; a113702[i]:=t od: seq(a113702[j],j=0..i-1); # Robert Israel, Jan 16 2019
Comments