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 A072580 #10 Jul 28 2025 03:13:18
%S A072580 11,13,71,79,89,107,127,131,139,157,179,181,227,229,331,337,419,421,
%T A072580 433,457,461,487,491,787,797,809,811,821,823,853,877,919,977,1163,
%U A072580 1181,1213,1223,1231,1277,1279,1459,1487,1523,1667,1697,1733,1741,1861,1867
%N A072580 a(n) = A000040(A072577(n)).
%H A072580 Amiram Eldar, <a href="/A072580/b072580.txt">Table of n, a(n) for n = 1..10000</a>
%F A072580 A023416(a(n)) = A023416(A072577(n)) = A035103(n).
%e A072580 In binary representation 20 and A000040(20) = 71 have three 0's: 13 = '10100' and 71 = '1000111', therefore 71 is a term.
%t A072580 With[{m = 300}, Select[Transpose[{Range[m], Prime[Range[m]]}], Equal @@ DigitCount[#, 2, 0] &]][[;; , 2]] (* _Amiram Eldar_, Jul 27 2025 *)
%Y A072580 Cf. A000040, A023416, A035103, A072439, A072577, A072581, A072582, A072584.
%K A072580 nonn,base,easy
%O A072580 1,1
%A A072580 _Reinhard Zumkeller_, Jun 23 2002