%I#20 2021年11月7日19:02:08
%S 2,232232333233232232222333222222232223332232232232323232,
%电话:2222222222 322223333222222223222222223332333,
%电话:22222222 332233222222222323222222222522233222222252252222222322222222022222233222322333
%N最小的N位素数,只包含数字2和3。
%C推测对于n的每一个值都存在这样的素数。
%H Alois P.Heinz,n的表格,n=1..400的a(n)</a>
%H Robert G.Wilson v,评论和前121个术语</a>
%t Do[p=2(10^n-1)/9;k=0;While[!PrimeQ[p],k++;p=FromDigits[PadLeft[IntegerDigits[k,2],n]+2]];打印[p],{n,1,30}](*_Robert G.Wilson v_,2002年4月20日*)
%t表[SelectFirst[FromDigits/@Tuples[{2,3},n],PrimeQ],{n,20}](*_哈维·P·戴尔,2021年11月7日*)
%o(Python)
%o来自sympy import isprime
%o来自itertools导入产品
%o定义a(n):
%o表示产品中的b(“01”,重复=n):
%o m=int(“”.join(b).replace(“0”,“2”).replay(“1”,“3”))
%o if isprime(m):返回m
%o返回无
%o打印([a(n)代表范围(1,21)中的n)]#_Michael S.Branicky_,2021年2月23日,在_Robert G.Wilson v_
%Y参考A036229、A020458、A036310、A069841。
%K nonn,基础
%O 1,1号机组
%A _帕特里克·德·吉斯特,1999年1月4日
%E编辑:Jon E.Schoenfield_,2014年3月27日
|