|
%I #7 Aug 14 2013 17:07:50
%S 0,0,1,1,3,3,6,4,7,7,8,11,16,17,19,11,15,15,16,19,22,18,28,29,36,37,
%T 40,41,49,51,48,26,31,31,32,35,34,39,44,45,50,51,39,53,66,63,72,67,76,
%U 77,80,81,90,87,90,98,109,111,116,118,122,125,109,57,63,63,64,67,66,71,76
%N a(n) = A078823(n) - n.
%C Sum of all distinct binary numbers contained as proper substrings in the binary representation of n.
%H Reinhard Zumkeller, <a href="/A144624/b144624.txt">Table of n, a(n) for n = 0..10000</a>
%o (Haskell)
%o a144624 n = a078823 n - fromIntegral n -- _Reinhard Zumkeller_, Aug 14 2013
%K nonn
%O 0,5
%A _N. J. A. Sloane_, Jan 18 2009
%E Extended by _Ray Chandler_, Mar 13 2010
|
