|
|
抵消
|
1,1
|
|
|
评论
|
a（n）==46或100（模式146）。
|
|
|
链接
|
|
|
|
例子
|
100在序列中，因为100^2+1=73*137。
246在序列中，因为246^2+1不能被任何小于73的素数整除，并且可以被73整除-大卫·A·科内斯2017年4月29日
|
|
|
数学
|
lst＝｛｝；Do[If[FactorInteger[n^2+1][[1，1]]==73，AppendTo[lst，n]]，{n，2，10000}]；第一次
选择[Range[8100]，FactorInteger[#^2+1][[1，1]]==73&](*哈维·P·戴尔2017年4月29日*）
p=73；ps=选择[Range[p-1]，Mod[#，4]！=3&&PrimeQ[#]&]；选择[Range[8000]，Divisible[（nn=#^2+1），p]&&！或@@可除[nn，ps]&](*阿米拉姆·埃尔达尔2019年8月16日*）
|
|
|
黄体脂酮素
|
（PARI）是（n）={my（m=n%146，p=2，n21=n^2+1，v=[5，13，17，29，37，41，53，61]）；
返回（abs（73-m）==27&&和（i=1，#v，p=下一个质数（p+1））；估值（n21，v[i]）==0）}
小于等于（n）={my（l=List（），i=54，m=46）；而（m<n，如果（是（m），listput（l，m））；m+=i；i=146-i）；l}\\大卫·A·科内斯2017年4月29日
|
|
|
交叉参考
|
|
|
|
关键词
|
非n,容易的
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
