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 A107911 #16 Jul 30 2025 09:46:22 %S A107911 12,19,24,25,28,35,38,39,44,48,49,50,51,52,56,57,60,67,70,71,75,76,77, %T A107911 78,79,83,88,89,92,96,97,98,99,100,101,102,103,104,105,108,112,113, %U A107911 114,115,116,120,121,124,131,134,135,139,140,141,142,143,147,150,151,152 %N A107911 Numbers having consecutive zeros and also consecutive ones in binary representation. %H A107911 Amiram Eldar, <a href="/A107911/b107911.txt">Table of n, a(n) for n = 1..10000</a> %H A107911 <a href="/index/Ar#2-automatic">Index entries for 2-automatic sequences</a>. %t A107911 czcoQ[n_]:=Module[{c2=Partition[IntegerDigits[n,2],2,1]},MemberQ[c2,{0,0}]&&MemberQ[c2,{1,1}]]; Select[Range[200],czcoQ] (* _Harvey P. Dale_, Jul 24 2012 *) %o A107911 (Python) %o A107911 def ok(n): b = bin(n)[2:]; return "00" in b and "11" in b %o A107911 print([k for k in range(153) if ok(k)]) # _Michael S. Branicky_, Dec 19 2021 %Y A107911 Intersection of A004753 and A004780. %Y A107911 Complement of A107909. %Y A107911 Cf. A007088, A107907. %K A107911 nonn,base %O A107911 1,1 %A A107911 _Reinhard Zumkeller_, May 28 2005 %E A107911 Offset changed to 1 by _Michael S. Branicky_, Dec 19 2021