%I A065882
%S A065882 1,2,3,1,1,2,3,2,1,2,3,3,1,2,3,1,1,2,3,1,1,2,3,2,1,2,3,3,1,2,3,2,1,2,3,
%T A065882 1,1,2,3,2,1,2,3,3,1,2,3,3,1,2,3,1,1,2,3,2,1,2,3,3,1,2,3,1,1,2,3,1,1,2,
%U A065882 3,2,1,2,3,3,1,2,3,1,1,2,3,1,1,2,3,2,1,2,3,3,1,2,3,2,1,2,3,1,1,2,3,2,1
%N A065882 Ultimate modulo 4: right-hand nonzero digit of n when written in base 
               4.
%H A065882 Harry J. Smith, <a href="b065882.txt">Table of n, a(n) for n=1,...,1000</
               a>
%H A065882 <a href="Sindx_Fi.html#final">Index entries for sequences related to 
               final digits of numbers</a>
%F A065882 If n mod 4 = 0 then a(n) = a(n/4), otherwise a(n) = n mod 4. a(n) = A065883(n) 
               mod 4.
%F A065882 Fixed point of the morphism : 1 ->1231, 2 ->1232, 3 ->1233, starting 
               from a(1) = 1 . Sequence read mod 2 gives A035263. a(n) = A007913(n) 
               mod 4. - DELEHAM Philippe (kolotoko(AT)wanadoo.fr), Mar 28 2004
%e A065882 a(7)=3 and a(112)=3, since 7 is written in base 4 as 13 and 112 as 1300.
%t A065882 Nest[ Flatten[ # /. {1 -> {1, 2, 3, 1}, 2 -> {1, 2, 3, 2}, 3 -> {1, 2, 
               3, 3}}] &, {1}, 4] (from Robert G. Wilson v (rgwv(AT)rgwv.com), May 
               07 2005)
%o A065882 (PARI) baseE(x, b)= { local(d, e=0, f=1); while (x>0, d=x%b; x\=b; e+=d*f; 
               f*=10); return(e) } { for (n=1, 1000, a=baseE(n, 4); while (a%10 
               == 0, a\=10); write("b065882.txt", n, " ", a%10) ) } [From Harry 
               J. Smith (hjsmithh(AT)sbcglobal.net), Nov 03 2009]
%Y A065882 In base 2 this is A000012, base 3 A060236 and base 10 A065881. Cf. A010873, 
               A065883.
%Y A065882 Sequence in context: A070913 A114280 A123564 this_sequence A007884 A157813 
               A111879
%Y A065882 Adjacent sequences: A065879 A065880 A065881 this_sequence A065883 A065884 
               A065885
%K A065882 base,nonn,new
%O A065882 1,2
%A A065882 Henry Bottomley (se16(AT)btinternet.com), Nov 26 2001