%I#34 2022年11月15日13:56:11

%S 8989998989999998999899989999999898889899898889989999899，

%电话：88889898988989889898999989988898999999889899899988889889889，

%电话：9899999998989999998888989988899898898989989888989889989898898898989898888898999998888989

%N个仅包含数字8和9的素数。

%C或者，最小数字为8的素数。

%H Michael S.Branicky，n的表，n=1..100000的a（n）（文森佐·利班迪的术语1..1000）

%H<a href=“/index/Pri#PrimesWithDigits”>为给定集合中具有数字的素数项建立索引</a>

%t选择[Prime[Range[80000]]，Min[IntegerDigits[#]]==8&]（*_Zak Seidov_，2005年5月7日*）

%t展平[表格[Select[FromDigits/@Tuples[{8，9}，n]，PrimeQ]，{n，8}]]（*_Vincenzo Librandi_，2012年7月27日*）

%o（PARI）对于（nd=1,9，p=向量（nd，i，10^（nd-i））~；forvec（v=矢量（nd，i，[8+（i==nd），9]），i素数（v*p）&&打印1（v*p“，”））\\_M.F.哈斯勒，2010年3月18日

%o（Python）

%o来自sympy import isprime

%o从itertools导入count、islice、product

%o def agen（）：#术语生成器

%计数（2）中的d为o：

%o对于首批产品（“89”，重复=d-1）：

%o t=int（“”.join（first）+“9”）

%o如果是质数（t）：产生t

%o打印（列表（islice（agen），30））#_Michael S.Branicky_，2022年11月15日

%Y参考A020449（数字0和1）。。。，A020471（数字7和9）_M.F.Hasler，2010年3月18日

%K nonn，基础

%O 1,1号机组

%A·热心的W·威尔逊_

%E由N.J.A.Sloane编辑，2008年1月26日，根据列克拉杰·贝达西的建议_