存不存在一个数，从个位开始，每往前加一个数字之后所得的数依然是素数？ 第1页
1
GalAster 网友的相关建议:
这样的素数叫做左截断素数[1], 其中十进制中最大的是 357686312646216567629137, 十进制中一共有4256个这样的素数
LeftTruncatablePrimes [ 1 ] := Select [ Range [ 9 ], PrimeQ ] LeftTruncatablePrimes [ n_ ] := LeftTruncatablePrimes [ n ] = Block [ { list = Outer [ List , Range [ 1 , 9 ], LeftTruncatablePrimes [ n - 1 ]]}, Select [ #1 * 10 ^ ( n - 1 ) + #2 & @@@ Flatten [ list , 1 ], PrimeQ ] ] 同理可以定义右截断素数, 共79个, 最大的是 73939133
RightTruncatablePrimes [ 1 ] := Select [ Range [ 9 ], PrimeQ ] RightTruncatablePrimes [ n_ ] := RightTruncatablePrimes [ n ] = Block [ { list = Outer [ List , RightTruncatablePrimes [ n - 1 ], { 1 , 3 , 6 , 7 , 8 , 9 }]}, Select [ 10 #1 + #2 & @@@ Flatten [ list , 1 ], PrimeQ ] ] 参考
1
相关话题
公民身份号码有可能是素数吗？为什么民科对数论情有独钟？
存不存在一个数，从个位开始，每往前加一个数字之后所得的数依然是素数？
所有质数的倒数的平方和的精确值是多少？
如何用准确的数学语言证明:两素数分别n次方后还是互素?
10的100次方内的素数的中位数在什么范围内，你可以估算到多高的精度?
所有质数的倒数的平方和的精确值是多少？
「素数」和「合数」算反义词吗？
请问2^2^2^2+3^3^3^3是否为素数呢？
连续四个正奇数有可能都是素数吗？
相关的话题
你相信质数会有递推表达式，或者有简单的几何形态吗？根号素数的有限组合是否一定是无理数?
请问是质数更多还是合数更多还是一样多？
公民身份号码有可能是素数吗？
请通俗易懂地讲讲什么是素数（质数）？
为什么二是质数，我感觉它好委屈啊？
「素数」和「合数」算反义词吗？
高斯素数有类似于素数定理的分布律吗？
如何用准确的数学语言证明:两素数分别n次方后还是互素?
可以找到两个质数，他们的比值最接近 π 吗？
只用高中数学知识水平能解出哥德巴赫猜想吗？
本人高中生疑似发现质数个数分布规律，下一步应该怎么做?
「素数」和「合数」算反义词吗？
级数求积：是否有一般的收敛判别法？以及实例∏[p是素数] p/(p-1) 是否收敛?
怎么证明2³²+1不是素数？
下面这个关于质数的不等式如何证明？
求一个整数的所有素数因子的思路是什么？
10的100次方内的素数的中位数在什么范围内，你可以估算到多高的精度?
为什么说尾数为1、3、7、9的素数个数是基本相同的？
站在一个无穷大的围棋/五子棋盘上的任意格点上，能够看到的格点都放上黑棋，黑棋占格点比例多少？
怎么证明关于素数的米尔斯常数A是存在的?
黎曼猜想具体是如何推出素数定理的广义形式的？
是否大于等于5的质数都能写成质数+质数+1？
全世界的数学家能在18天内找到质数排列规律么？
一个四位质数，各位相加得出的和是不是仍是质数（和为偶数除外）？
为什么n为素数时，n能整除2^n - 2，怎么证明?
怎么证明关于素数的米尔斯常数A是存在的?
全世界的数学家能在18天内找到质数排列规律么？
两相邻素数的最大间距能够多大？
本人高中生疑似发现质数个数分布规律，下一步应该怎么做?