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 A100722 #9 Jul 08 2025 06:40:25
%S A100722 37,41,43,53,73,83,89,101,107,109,137,139,151,157,163,167,179,197,211,
%T A100722 229,233,269,281,283,307,311,313,317,353,359,367,379,389,397,401,409,
%U A100722 419,431,433,439,443,457,461,467,491,521,523,541,547,563,569,571,577
%N A100722 Prime numbers whose binary representations are split into exactly five runs.
%C A100722 The n-th prime is a term iff A100714(n)=5.
%H A100722 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/Run-LengthEncoding.html">Run-Length Encoding</a>.
%e A100722 a(3)=43 is a term because it is the 3rd prime whose binary representation splits into exactly five runs. 43_10 = 101011_2 splits into {{1}, {0}, {1}, {0}, {1,1}}.
%t A100722 Select[Table[Prime[k], {k, 1, 50000}], Length[Split[IntegerDigits[ #, 2]]] == 5 &]
%Y A100722 Cf. A100714, A000668 (exactly 1 run), A082554 (exactly 3 runs), A100723 (exactly 7 runs).
%K A100722 base,nonn
%O A100722 1,1
%A A100722 Joseph Biberstine (jrbibers(AT)indiana.edu), Dec 11 2004