%I#25 2018年12月7日18:26:02
%S 3,5,7,13,17,19,31,37,53,59,71,73,79,971133313757773991997,
%电话:11173331555711131111111193333177739991119333331,
%电话:33333 755555733319999991111171111933333155555555555911111113
%N单数字奇数素数和十进制展开形式为iii.…ij的素数,其中i和j是不同的奇数。
%ts={3,5,7};做[Do[k=m*(10^n-1)/9*10+j;如果[j!=m&&PrimeQ[k],附加到[s,k]],{j,1,9,2}],{m,1,9,1}],},{n,1,8}];s(*_Amiram Eldar_,2018年11月8日*)
%o(PARI)列表a(nn)={print1(“3,5,7,”);对于(n=1,nn,r=(10^n-1)/9;对于步骤(i=1,9,2,对于步骤(j=1,9,2,如果(i!=j,如果(isprime(p=fromdigits(concat(digits,r*i),j))),print1
%Y参见A051200、A055558、A062353、A065582、A105975、A141311、A320256。
%K nonn,基础
%O 1,1号机组
%A_Enrique Navarrete,2018年11月7日
%E a(35)-a(42),来自_Amiram Eldar_,2018年11月8日
|