|
|
101, 113, 131, 151, 181, 191, 199, 211, 223, 227, 229, 233, 277, 311, 313, 331, 337, 353, 373, 383, 433, 443, 449, 499, 557, 577, 599, 661, 677, 727, 733, 757, 773, 787, 797, 811, 877, 881, 883, 887, 911, 919, 929, 977, 991, 997, 1117, 1151, 1171, 1181, 1511
(列表；图表；参考；听；历史；文本；内部格式)
|
|
|
|
抵消
|
1,1
|
|
|
链接
|
|
|
|
数学
|
lst={}；Do[If[PrimeQ[n]&&SortBy[Tally[IntegerDigits[n]]，Last][[-1，-1]]==整数长度[n]-1，附加到[lst，n]]、{n、101、10^3}]；第一次(*阿尔卡迪乌斯·韦索洛夫斯基2011年9月18日*）
lst={}；Do[r=（10^n-1）/9；Do[AppendTo[lst，DeleteCase[Select[FromDigits[Permutations[Append[IntegerDigits[a*r]，d]]，PrimeQ]，r|2|3|5|7]]，{a，9}，{d，0，9}]，{n，2，6}]；排序[展平[lst]](*阿尔卡迪乌斯·韦索洛夫斯基2011年9月22日*）
|
|
|
黄体脂酮素
|
（Python）
从sympy导入isprime
从itertools导入计数，islice
def agen（）：#术语生成器
对于计数（3）中的d：
ds=设置（）
以“1379”结尾：
如果c！=“123456789”中c的ds.update（int（c*（d-1）+end）结束）
对于“0123456789”中的差异：
如果结束==差异：继续
cands=（end*i+diff+end*（d-1-i），对于范围（d-1）中的i）
ds.update（int（t）for t in cands，如果t[0]！="0")
排序后的产量（t对于ds中的t，如果是i素数（t））
打印（列表（islice（agen（），52））#迈克尔·布拉尼基2022年5月17日
|
|
|
交叉参考
|
|
|
|
关键词
|
非n,基础
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
|
