[seqfan] Re: "summer hours" NEW SEQ Z1

[zak seidov]

Thanks, Jeremy et al!

FYI
Submitted, but yet not appeared:

%I A178679
%S A178679 0,1,9,10,12,94,118,120,2217,22204,22602,26608,27004,27009,531795,
%T A178679 5021473,5321298,6384861,50218140,63858541,1181639052,12029699478,
%U A178679
14392731189,15114438648,283004031766,283592574694,2672433464707,283593292766
1
%N A178679 Numbers n such that the binary expansion of n starts with the
base 3 expansion
               of n.
%e A178679 2217 = 100010101001 (base 2)
%e A178679 2217 = 10001010.... (base 3)
%e A178679 531795 = 10000001110101010011 (base 2)
%e A178679 531795 = 1000000111010....... (base 3)
%t A178679 Do[i3=IntegerDigits[n,2];l3=Length[i3];i=FromDigits[i3,3];
i2=IntegerDigits[i,2];If[i3==Take[i2,l3],Print[i]];,{n,0,10^7}];(*Ray Chandler*)
%Y A178679 Cf. A169828, A178680.
%K A178679 nonn,new
%O A178679 1,3
%A A178679 Zak Seidov (zakseidov(AT)yahoo.com) and Ray 
Chandler
(rayjchandler(AT)sbcglobal.net), Jun 03 2010

Best, Zak

--- On Fri, 6/4/10, Jeremy Gardiner <jeremy.gardiner at btinternet.com> wrote:


> additional terms:
> 
> 50218140 =
> 10111111100100010010011100   (base 2)
>        
>    10111111100100010     
>       (base 3)
> 
> 63858541 =
> 11110011100110011101101101   (base 2)
>        
>    11110011100110011     
>       (base 3)
> 
>