|
| |
|
| A079652号 |
| 仅使用弯曲数字0、3、6、8和9的质数。 |
|
6
|
|
|
|
3, 83, 89, 383, 389, 683, 809, 839, 863, 883, 983, 3083, 3089, 3389, 3803, 3833, 3863, 3889, 3989, 6089, 6389, 6689, 6803, 6833, 6863, 6869, 6883, 6899, 6983, 8009, 8039, 8069, 8089, 8093, 8363, 8369, 8389, 8609, 8663, 8669, 8689, 8693, 8699, 8803, 8839
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,1
|
|
|
评论
|
|
|
|
链接
|
Chris K.Caldwell和G.L.Honaker，Jr。，30689，顶级古玩！
Chris K.Caldwell和G.L.Honaker，Jr。，90863，顶级古玩！
|
|
|
MAPLE公司
|
N： =4:#以获取最多N位数字的所有术语
挖掘：={0,3,6,8,9}：
A： =空：
对于从1到N的d do
C： =组合[cartprod]（[Digs减去{0}，Digs$（d-1）]）；
而不是C[完成]做
五十： =C[下一个值]（）；
x： =加（L[i]*10^（d-i），i=1..d）；
如果是素数（x），则A:=A，xfi
操作系统
日期：
|
|
|
数学
|
选择[Range[8850]，PrimeQ[#]和&Union[Join[IntegerDigits[#]，{0，3，6，8，9}]=={0，3,6,8,9}&]
选择[Prime[Range[5000]]，Intersection[Integer Digits[#]，{1，2，4，5，7}]=={}&](*K.D.Bajpai，2014年9月1日*）
选择[FromDigits/@Tuples[{0，3，6，8，9}，4]，PrimeQ](*哈维·P·戴尔2022年9月5日*）
|
|
|
交叉参考
|
|
|
|
关键词
|
基础,非n
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
