%I#32 2022年1月10日08:32:27

%S 3,5,7,11,13,19,23,29,31,43,47,53,59,61,71,79,83103107109127151，

%电话15716717317918119119921122323925127128330731317331，

%电话：347349359367373379383431439443461463467479487491499

%N A036991中的质数。

%C该序列包括A000668。

%C猜想：序列是无限的。例如，在前100万个素数（参见A000040）中，304208个数字是A036991的项。

%H Gennady Eremin，n表，n=1..20000时的a（n）</a>

%F A000040和A036991的交叉点。

%pq:=proc（n）局部l，t，i；l： =位[分割]（n）；t： =0；

%p对于i到nops（l）dot:=t-1+2*l[i]；

%p如果t<0，则返回假fi

%p od：正确

%p端：

%p选择（isprime和q，[$2..500]）[]；#_阿洛伊斯·海因茨，2022年1月7日

%t q[n_]：=PrimeQ[n]&&AllTrue[累加[（-1）^反转[整数位数[n，2]]，#<=0&]；选择[范围[500]，q]（*_Amiram Eldar_，2022年1月7日*）

%o（Python）

%o来自sympy import isprime

%o定义正常（n）：

%o如果n==0：返回True

%o计数={“0”：0，“1”：0}

%o表示bin（n）中的位[：1:-1]：

%o计数[位]+=1

%o如果count[“0”]>count[“1”]：返回False

%o返回i质数（n）

%o打印（[k代表范围（3500，2）内的k，如果可以（k）]）#_Michael S.Branicky_，2022年1月7日

%Y A000040、A005408、A036991、A042987、A045395、A095070、A095074、A216285的子序列。

%Y参考A000668。

%K nonn，基础

%O 1,1号机组

%A _Gennady Eremin，2022年1月7日