cp's OEIS Frontend

A113702 Trajectory of 10 under map k -> A111273(k).

%I A113702 #8 Jan 17 2019 02:53:31
%S A113702 10,11,22,23,12,13,91,161,189,285,429,473,869,957,1437,2157,3237,4857,
%T A113702 7287,4164,3470,4511,2256,1464,1172,782,783,392,294,413,531,342,343,
%U A113702 172,173,519,346,347,694,1735,1388,926,927,464,248,166,167,84,70,71,36,37
%N A113702 Trajectory of 10 under map k -> A111273(k).
%C A113702 10 is the smallest number that is not member of a k-cycle with k <=13 of permutation A111273.
%C A113702 Conjecture: Sequence is not periodic.
%C A113702 For the retrograde trajectory of 10 see A113703.
%H A113702 Robert Israel, <a href="/A113702/b113702.txt">Table of n, a(n) for n = 0..81</a>
%p A113702 # assuming A111273 is a list, Vector or table
%p A113702 a113702[0]:= 10:
%p A113702 for i from 1 do
%p A113702   t:= traperror(A111273[a113702[i-1]]);
%p A113702 if not t::integer then break fi;
%p A113702   a113702[i]:=t
%p A113702 od:
%p A113702 seq(a113702[j],j=0..i-1); # _Robert Israel_, Jan 16 2019
%Y A113702 Cf. A111273, A113659, A113700, A113701, A113703.
%K A113702 nonn
%O A113702 0,1
%A A113702 _Klaus Brockhaus_, Nov 08 2005