|
| |
|
| A082123号 |
| 序列的部分积p的任何除数d的d和p/d之间的最小差值>1，从17开始。 |
|
2
|
|
|
|
17, 16, 26, 36, 76, 94, 432, 37220, 996768, 158267352, 973348166592, 8429202561226344, 419324164827901536306744, 339991740461303603766175692597227316, 12025891484499365294341150949542442100059557280661504
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,1
|
|
|
链接
|
|
|
|
MAPLE公司
|
分支：=进程（m，dm，bestyet）
局部t，x，nby，r；
nby：=最好的；
对于从F[m][2]到-1到0的t do
x： =dm*F[m][1]^t；
如果x>=nby，则下一步
elif x>=c，然后nby：=x
elif（x*R[m]<c）或（m=nF）然后断开
else nby：=分支（m+1，x，nby）；
fi（菲涅耳）
od；
nby公司
结束进程：
P： =17:A[1]：=17:
对于n，从2到15 do
c： =天花板（1/2+1/2*sqrt（5+4*P））；
当不输入（c，integer）时，执行数字：=2*数字；c： =评估（c）od：
F： =系数（P）[2]；nF:=nops（F）；
F： =排序（F，（s，t）->s[1]>t[1]）；
R： =[seq（mul（F[i][1]^F[i][2]，i=j+1.nF），j=1.nF）]；
d： =分支（1，1，P）；
A[n]：=d-P/d；
P： =P*A[n]
日期：
|
|
|
黄体脂酮素
|
（PARI）p=17；打印1（p，“，”）；对于（n=1,13，r=楼层（sqrt（p））；d1=1；d2=1；nE=ω（p）；P=系数（P）；E=P[，2]；P=P[，1]；对于vec（v=向量（nE，i，[0，E[i]]），x=prod（k=1，nE，P[k]^v[k]）；如果（x<=r&&x>=d2，d1=d2；d2=x，如果（x=d2&&x>=d1，d1=x））；difer=p/d2-d2；如果（difer<=1，difer=p/d1-d1）；打印1（difer“，”）；p*=差值）
|
|
|
交叉参考
|
|
|
|
关键词
|
非n,坚硬的,更多
|
|
|
作者
|
|
|
|
扩展
|
a（12）来自Herman Jamke（hermanjamke（AT）fastmail.fm），2006年11月2日
a（13）来自Herman Jamke（hermanjamke（AT）fastmail.fm），2006年11月14日
|
|
|
状态
|
经核准的
|
| |
|
|
