%I#6 2013年11月21日12:47:50
%序号1,7,13,26,37,41,42,45,49,50,58,59,62,69,70,74,78,79,87103105107,
%电话:110114118121134139141142145147158161162164165168175,
%U 1851891982022032132142232272324342267275289292电话
%在二进制表示中:N具有与第N个素数具有0相同数量的1。
%C A023416(A072582(n))=A000120(a(n)]=A035103(n);
%Ca(n)=A049084(A072582(n))。
%e在二进制表示中,70=‘1000110’有三个1,A000040(70)=349=‘101011101’有三种1:因此70是一个项。
%t选择[Range[300],DigitCount[#,2,1]==数字计数[Prime[#],2,0]&](*哈维·P·戴尔,2012年5月2日*)
%Y参见A072578、A071600、A072577。
%K nonn公司
%O 1,2号机组
%A _Reinhard Zumkeller,2002年6月23日
|