%I#43 2023年1月30日08:25:24
%S 2,3,5,7,11,13,23,31,37,43,61,73101103113131151223227233,
%电话:24125127730731331337373401461463467521547557577661,
%电话:67370182788710131033110315111181121312231130113271567
%以10为基数的N个素数,当读到一个较小的基数,即1加上以10为底的素数中的最大数字时,也是素数。
%H Michael S.Branicky,n的表,a(n)表示n=1..10000</a>
%pq:=n->i素数(n)和(l->(d->d<9)以及i素数*
%p(d+1)^(i-1),i=1…nops(l)))(最大值(1))(转换(n,基数,10)):
%p选择(q,[1..2000])[];#_阿洛伊斯·海因茨,2023年1月27日
%tq[p_]:=模块[{d=整数位数[p],b},b=最大值[d]+1;b<=9&&PrimeQ[源数字[d,b]]];选择[Prime[Range[250]],q](*_Amiram Eldar_,2023年1月27日*)
%o(Python)
%o来自sympy import isprime
%o定义正常(n):
%o如果不是isprime(n):返回False
%o s=str(n)
%o b=整数(最大值)+1
%o返回b!=10和isprime(int(s,b))
%o打印([k代表范围(1600)内的k,如果可以(k)])#_Michael S.Branicky_,2023年1月27日
%o(PARI)isok(p)=如果(isprime(p),my(v=数字(p)),b=vecmax(v)+1);b<10&&isprime(从数字(v,b)),0)\\_Andrew Howroyd_,2023年1月27日
%A038617的Y子序列。
%K nonn,基础
%O 1,1
%A _Alfred Jacob Mohan,2023年1月27日
%E更多条款,来自_Michael S.Branicky_,2023年1月27日
|