存不存在一个数，从个位开始，每往前加一个数字之后所得的数依然是素数？ 第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
相关话题
一个四位质数，各位相加得出的和是不是仍是质数（和为偶数除外）？本人高中生疑似发现质数个数分布规律，下一步应该怎么做?
是否存在一不等于0的完全平方数，使得它成为连续质数个整数之积？
为什么民科对数论情有独钟？
有没有哪个素数可以以多种方式写成两个正整数的平方和？
到底有没有素数公式？素数公式的意义有多大？
是否大于等于5的质数都能写成质数+质数+1？
公民身份号码有可能是素数吗？
是否存在一不等于0的完全平方数，使得它成为连续质数个整数之积？
如何用准确的数学语言证明:两素数分别n次方后还是互素?
相关的话题
是否大于等于5的质数都能写成质数+质数+1？只用高中数学知识水平能解出哥德巴赫猜想吗？
如何证明任意比2更大的偶数都是两个素数之和？
如何判断一个超级大的数是不是素数？
公民身份号码有可能是素数吗？
高斯素数有类似于素数定理的分布律吗？
威尔逊定理中 p=4是一个例外，为什么？是否存在其他非质数的例外？
P是素数，(2^2p)-3一定是素数吗？
存不存在连续的三个奇数都是素数（3，5，7 除外）？如果不存在又是为什么？
为什么 1 不能被认为是质数？
存不存在一个数，从个位开始，每往前加一个数字之后所得的数依然是素数？
请问是质数更多还是合数更多还是一样多？
有没有哪个素数可以以多种方式写成两个正整数的平方和？
「素数」和「合数」算反义词吗？
两相邻素数的最大间距能够多大？
怎么说明质数有无限个？
连续四个正奇数有可能都是素数吗？
是否存在一不等于0的完全平方数，使得它成为连续质数个整数之积？
可以找到两个质数，他们的比值最接近 π 吗？
公民身份号码有可能是素数吗？
存不存在一个数，从个位开始，每往前加一个数字之后所得的数依然是素数？
请问是质数更多还是合数更多还是一样多？
本人高中生疑似发现质数个数分布规律，下一步应该怎么做?
求一个整数的所有素数因子的思路是什么？
如何证明存在 1000 个连续的正整数中恰好有五个素数？
级数求积：是否有一般的收敛判别法？以及实例∏[p是素数] p/(p-1) 是否收敛?
如果我有一个函数 f(x) 表示第 x 个素数有什么用？
证明了黎曼猜想就能马上得到素数公式吗？
求一个整数的所有素数因子的思路是什么？
是否大于等于5的质数都能写成质数+质数+1？