|
| |
|
| A084121号 |
| 素数p_n使得n*p_n是回文。 |
|
2
|
|
|
|
2, 3, 11, 37, 53, 33827, 39119, 9260479, 10708871, 23858227, 65941772591
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,1
|
|
|
评论
|
|
|
|
链接
|
|
|
|
例子
|
4119素数39119在序列中，因为4199*39119=161131161是回文。
|
|
|
数学
|
palQ[n_]：=起始数字[Reverse[IntegerDigits[n]]==n；t={}；Do[p=素数[n]；如果[palQ[p*n]，AppendTo[t，p]]，{n，15*10^5}]；t吨(*贾扬达·巴苏2013年5月11日*）
模块[{nn=2763*10^6}，选择[Thread[{Range[nn]，Prime[Range[nn]]}]，PalindromeQ[Times@@#]&]][[All，2]]（*需要Mathematica版本10或更高版本*）（*程序将需要很长时间才能运行。*）(*哈维·P·戴尔2020年7月16日*）
|
|
|
交叉参考
|
|
|
|
关键词
|
基础,非n
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
