1、代码截图如下。这是一个自定义函数TruncatablePrimes，其变量是正整数p，如果p不是素数，则返回一个空列表，如果p是素数，就新建一个包含p的子列表，矣喾动痞并在这个子列表里面重复调用TruncatablePrimes函数，不过呢，此时TruncatablePrimes的变量，变成了在p的左边添加一个1到9的数字而形成的新的数字。
3、以数字3结尾的最大截断素数是：Max[TruncatablePrimes[3]//Flatten]
5、通过枚举法可以证明，作者铅笔上的素数是最大的截断素数。Max[(TruncatablePrimes[#&/@{3,7,9,11,31,41,61,71})//Flatten]
