存不存在一个数，从个位开始，每往前加一个数字之后所得的数依然是素数？ 第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
相关话题
下面这个关于质数的不等式如何证明？黎曼猜想具体是如何推出素数定理的广义形式的？
如果我有一个函数 f(x) 表示第 x 个素数有什么用？
如何证明任意比2更大的偶数都是两个素数之和？
为什么 1 不能被认为是质数？
所有质数的倒数的平方和的精确值是多少？
到底有没有素数公式？素数公式的意义有多大？
站在一个无穷大的围棋/五子棋盘上的任意格点上，能够看到的格点都放上黑棋，黑棋占格点比例多少？
本人高中生疑似发现质数个数分布规律，下一步应该怎么做?
可以找到两个质数，他们的比值最接近 π 吗？
相关的话题
10的100次方内的素数的中位数在什么范围内，你可以估算到多高的精度?所有质数的倒数的平方和的精确值是多少？
为什么 1 不能被认为是质数？
本人高中生疑似发现质数个数分布规律，下一步应该怎么做?
是否存在一不等于0的完全平方数，使得它成为连续质数个整数之积？
威尔逊定理中 p=4是一个例外，为什么？是否存在其他非质数的例外？
如何证明f（n）=n^2+n+1，则使f（n）为质数的n的值有无数个？
「素数」和「合数」算反义词吗？
为什么民科对数论情有独钟？
是否存在一个次数不低于 2 的整系数多项式，在任何素数处的取值都是素数？
为什么 1 不能被认为是质数？
可以找到两个质数，他们的比值最接近 π 吗？
公民身份号码有可能是素数吗？
为什么n为素数时，n能整除2^n - 2，怎么证明?
两相邻素数的最大间距能够多大？
存不存在一个数，从个位开始，每往前加一个数字之后所得的数依然是素数？
为什么 1 不能被认为是质数？
如何判断一个超级大的数是不是素数？
一个四位质数，各位相加得出的和是不是仍是质数（和为偶数除外）？
到底有没有素数公式？素数公式的意义有多大？
是否存在一不等于0的完全平方数，使得它成为连续质数个整数之积？
P是素数，(2^2p)-3一定是素数吗？
如何证明任意比2更大的偶数都是两个素数之和？
请问2^2^2^2+3^3^3^3是否为素数呢？
证明了黎曼猜想就能马上得到素数公式吗？
为什么任何整数除以2或5都能除尽，而不一定能被其他质数除尽？
如何证明存在 1000 个连续的正整数中恰好有五个素数？
10的100次方内的素数的中位数在什么范围内，你可以估算到多高的精度?
全世界的数学家能在18天内找到质数排列规律么？
威尔逊定理中 p=4是一个例外，为什么？是否存在其他非质数的例外？