%I#36 2023年9月6日13:41:30
%S 1,4,5,7,8,12,21,28,29,43,48,50,54,56,57,60,63,67,68,70,75,76,89,90,
%电话:106109116118119126131138139141145151152155160166181,
%电话:183189196207228232238244249250252259263270280285287
%N数k,使得30*k-13,30*k-11是双素数。
%C所有大于7的双素数的形式都是30*k-{13,11},或30*k+-1(A176114),或30*k+{11,13}(A089160)。
%C所有双素数>7,最低有效十进制数为7,其形式为30*k-13。
%C所有双素数>7,小数最低有效位数为3的形式为30*k+13。
%F a(n)=A089161(n)+1。
%e1是一个项,因为1*30-13=17=素数(6)和1*30-11=19=素数。
%e4是一个项,因为4*30-13=107=素数(28)和4*30-11=109=素数。
%e5是一个项,因为5*30-13=137=素数(33)和5*30-11=139=素数。
%t选择[Range[300]和@@PrimeQ[30*#-{11,13}]&](*_Amiram Eldar_,2020年2月29日*)
%o(雷克斯)
%o S=1
%o当长度(S)<255时,N=2
%o如果NOPRIME(N*30-13),则迭代N
%o如果NOPRIME(N*30-11),则迭代N
%o S=S | |','N
%o结束N
%o说S
%o(PARI)isok(k)=i素数(30*k-13)&&素数(30*k-11);\\_米歇尔·马库斯,2020年2月29日
%Y参考A089160、A089161、A176114、A332772。
%Y参见A000040、A001097、A002822、A132242、A282323、A282342。
%K nonn,简单
%O 1,2号机组
%A _弗兰克·埃勒曼,2020年2月26日
|