login
The j-values of pairs (i,j) listed in A352909.
2

%I #19 Feb 25 2024 10:24:54

%S 0,1,0,2,0,3,2,1,0,4,0,5,4,1,0,6,4,2,0,7,6,5,4,3,2,1,0,8,0,9,8,1,0,10,

%T 8,2,0,11,10,9,8,3,2,1,0,12,8,4,0,13,12,9,8,5,4,1,0,14,12,10,8,6,4,2,

%U 0,15,14,13,12,11,10,9,8,7,6,5,4,3,2,1,0,16,0

%N The j-values of pairs (i,j) listed in A352909.

%C See A295989 for the i-values.

%H Rémy Sigrist, <a href="/A352910/b352910.txt">Table of n, a(n) for n = 1..6563</a> (values for i+j <= 256)

%t A352910list[ij_] := Select[Range[ij, 0, -1], BitAnd[#, ij-#] == 0 &];

%t Flatten[Array[A352910list, 25, 0]] (* _Paolo Xausa_, Feb 24 2024 *)

%Y Cf. A352909, A295989.

%K nonn,tabf,base

%O 1,4

%A _N. J. A. Sloane_, Apr 09 2022