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 A374103 #9 Jun 28 2024 11:47:24
%S A374103 311,599,641,881,1319,1697,1721,2657,2969,3257,4019,4127,4337,4721,
%T A374103 5009,6449,6569,6689,6761,7547,9041,9239,10457,10529,11171,11699,
%U A374103 11939,13691,16229,19379,20147,20357,20477,22697,23057,24977,25169,26249,26681,26729,27059
%N A374103 Numbers k such that k and k+2 are both prime binary self (or Colombian) numbers (A374102).
%H A374103 Amiram Eldar, <a href="/A374103/b374103.txt">Table of n, a(n) for n = 1..10000</a>
%t A374103 seq[max_] := Module[{c = Complement[Prime[Range[max]], Table[n + DigitCount[n, 2, 1], {n, 0, Prime[max]}]], d, ind}, d = Differences[c]; ind = Position[d, 2] // Flatten; c[[ind]]]; seq[3000]
%Y A374103 Subsequence of A001359, A339216 and A374102.
%Y A374103 Cf. A010061, A006378.
%K A374103 nonn,base,easy
%O A374103 1,1
%A A374103 _Amiram Eldar_, Jun 28 2024