A105104 - OEIS

%I #22 Feb 01 2023 08:17:32

%S 0,3,3,5,1,15,5,9,1,13,7,11,7,29,9,17,1,25,13,21,5,31,11,19,3,27,15,

%T 47,13,57,17,33,1,49,25,41,9,61,21,37,5,53,29,45,15,59,19,35,3,51,27,

%U 43,11,63,23,39,7,55,63,93,25,113,33,65,1,97,49,81,17,121,41,73

%N Write A102370 in binary (A103542), read backwards, omit leading zeros, convert to base 10.

%C Similar to A102370, but read diagonals in reverse direction.

%H David Applegate, Benoit Cloitre, Philippe Deléham and N. J. A. Sloane, Sloping binary numbers: a new sequence related to the binary numbers [<a href="http://neilsloane.com/doc/slopey.pdf">pdf</a>, <a href="http://neilsloane.com/doc/slopey.ps">ps</a>].

%F a(n) = A030101(A102370(n)). - _Philippe Deléham_, Nov 11 2007

%o (PARI) a1(n) = fromdigits(Vecrev(binary(n)), 2); \\ A030101

%o a0(n) = if( n<1, 0, sum(k=0, length(binary(n)), bitand(n + k, 2^k))); \\ A102370

%o a(n) = a1(a0(n)); \\ _Michel Marcus_, Apr 09 2022

%Y Cf. A030101, A102370, A103542.

%K nonn,base

%O 0,2

%A _N. J. A. Sloane_, Apr 30 2005

%E More terms from _Philippe Deléham_, Nov 11 2007

%E a(46)=19 inserted and more terms from _Georg Fischer_, Apr 08 2022