# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/

Search: id:a260729
Showing 1-1 of 1

%I A260729 #9 Aug 06 2015 07:45:41
%S A260729 29,33,93,217,341,961,2821,7409,8973,53625,94325,225169,470517,
%T A260729 1349089,4076589,22862205,40165377,506257425,918577233,1042701969,
%U A260729 5347778553,76822655445,242180261569,243151045949,835744242025,1398202164821,7718585207745,17886399120625,36628781776125,140199249091321,579641775855025,3110633457224293,9887055813390673
%N A260729 Iterates of A234742, starting from value a(0) = 29, with a(1) = A234742(a(0)), a(2) = A234742(a(1)), etc.
%C A260729 The sequence reaches its fixed point at a(141) = <term with 103 decimal digits; binary representation 340 bits long> after which the sequence stays constant, a(142) = a(143) = a(144), etc.
%H A260729 Antti Karttunen, <a href="/A260729/b260729.txt">Table of n, a(n) for n = 0..142</a>
%F A260729 a(0) = 29; for n >= 1, a(n) = A234742(a(n-1)).
%o A260729 (PARI)
%o A260729 allocatemem((2^29));
%o A260729 A234742(n) = factorback(subst(lift(factor(Mod(1, 2)*Pol(binary(n)))), x, 2)); \\ After _M. F. Hasler_'s Feb 18 2014 code.
%o A260729 iterates_of_A234742(start, filename) = {my(n=start, prev=-1, prevprev=-1, i=0); until((n==prevprev), write(filename, i, " ", n); prevprev = prev; prev = n; n = A234742(n); i++)} \\ Computes b-file up to the second occurrence of the fixed point.
%o A260729 iterates_of_A234742(29, "b260729.txt")
%o A260729 (Scheme, with memoizing macro definec)
%o A260729 (definec (A260729 n) (if (zero? n) 29 (A234742 (A260729 (- n 1)))))
%Y A260729 Cf. A234742, A260712, A260713.
%Y A260729 Cf. also A244323, A260735, A260441 for iterations starting from other values.
%K A260729 nonn
%O A260729 0,1
%A A260729 _Antti Karttunen_, Aug 04 2015

# Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE