login
First differences of A246520.
2

%I #10 Sep 08 2014 02:58:18

%S 3,7,10,16,9,27,32,32,17,17,38,64,64,64,64,64,33,33,33,33,33,107,128,

%T 128,128,128,128,128,128,128,128,128,65,65,65,65,65,65,65,65,65,65,

%U 150,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,129,129

%N First differences of A246520.

%C a(n) = A246520(n+1) - A246520(n).

%H Reinhard Zumkeller, <a href="/A246701/b246701.txt">Table of n, a(n) for n = 0..1000</a>

%o (Haskell)

%o a246701 n = a246701_list !! n

%o a246701_list = zipWith (-) (tail a246520_list) a246520_list

%o (Python)

%o def A246701(n):

%o ....return(max(int(bin(n+1-k)[2:]+bin(n+1+k)[2:],2) for k in range(n+2)) -max(int(bin(n-k)[2:]+bin(n+k)[2:],2) for k in range(n+1)))

%o # _Chai Wah Wu_, Sep 07 2014

%K nonn

%O 0,1

%A _Reinhard Zumkeller_, Sep 04 2014