A072582 a(n) = A000040(A072579(n)).

2, 17, 41, 101, 157, 179, 181, 197, 227, 229, 271, 277, 293, 347, 349, 373, 397, 401, 449, 563, 571, 587, 601, 619, 647, 661, 757, 797, 811, 821, 829, 853, 929, 947, 953, 971, 977, 997, 1039, 1103, 1129, 1213, 1231, 1237, 1303, 1307, 1409, 1433, 1459

Offset: 1

Author

Reinhard Zumkeller, Jun 23 2002

Keywords

• nonn
• base
• easy

Examples

			In binary representation 70 = '1000110' has three 1's and A000040(70) = 349 = '101011101' has three 1's: therefore 349 is a term.
		

Links

• Amiram Eldar, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A000040, A000120, A023416, A035103, A072439, A072579, A072580, A072581, A072584.

Programs

Mathematica

With[{m = 300}, Select[Transpose[{Range[m], Prime[Range[m]]}], DigitCount[First[#], 2, 1] == DigitCount[Last[#], 2, 0] &]][[;; , 2]] (* Amiram Eldar, Jul 28 2025 *)

Formula

A023416(a(n)) = A000120(A072579(n)) = A035103(n).