This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A364569 #8 Aug 14 2023 19:50:42 %S A364569 0,1,2,2,3,3,1,3,1,4,2,4,1,1,1,4,5,1,3,5,2,2,2,5,4,1,2,1,1,1,1,5,4,5, %T A364569 2,1,3,3,3,6,2,2,2,2,5,2,2,6,5,4,1,1,1,2,1,1,1,1,1,1,1,1,1,6,4,4,5,5, %U A364569 4,2,4,1,3,3,1,3,2,3,3,7,1,2,2,2,2,2,2,2,2,5,2,2,2,2,2,7,1,5,1,4,1,1,1,1,1 %N A364569 Length of the common prefix in the binary expansions of A156552(n) and n-1 [= A156552(A005940(n))]. %H A364569 Antti Karttunen, <a href="/A364569/b364569.txt">Table of n, a(n) for n = 1..65537</a> %o A364569 (PARI) %o A364569 Abincompreflen(n, m) = { my(x=binary(n), y=binary(m), u=min(#x, #y)); for(i=1, u, if(x[i]!=y[i], return(i-1))); (u); }; %o A364569 A364569(n) = Abincompreflen(A156552(n), (n-1)); %Y A364569 Cf. A005940, A156552, A364570. %Y A364569 Cf. also A347380. %K A364569 nonn %O A364569 1,3 %A A364569 _Antti Karttunen_, Aug 14 2023