搜索: 编号:a075769
|
|
A075769号
|
| Wallis对(x,y)满足sigma(x^2)=sigma;序列给出了x<y(按x值排序)的不可分解Wallis对的y。 |
|
+0 5
|
|
|
5, 407, 489, 749, 878, 1451, 1102, 1208, 1943, 1528, 1809, 1605, 2557, 3097, 3730, 4829, 6061, 4880, 6341, 6172, 7715, 7067, 10071, 17441, 11020, 17531, 14397, 17441, 14001, 24161, 24613, 14288, 14795, 20396, 25495, 22577, 19784, 15836, 19795, 27713, 30959
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
评论
|
如果(x,y)和(u,v。这种对称为可分解对。如果(x,y)和(cx,cy)是Wallis对,那么(cx、cy)也称为可分解。
|
|
参考文献
|
I.卡普兰斯基,费马、沃利斯和奥扎南的挑战(以及几个相关的挑战):II。费马的第二个挑战,预印本,2002年。
|
|
链接
|
|
|
例子
|
(4,5)是Wallis对,因为西格玛(16)=西格玛(25)=31。
|
|
数学
|
xmax=20000;σ[n_]:=σ[n]=除数σ[1,n];瓦利斯Q[{x_,y_}]:=西格玛[x^2]==西格马[y^2];pairs=Reap[Do[Do[If[WallisQ[{x,y}]&&!(GCD[x,y]!=1&&WallisQ[{x,y}/GCD[x,y]]),打印[{x、y},“是要测试不可分解性的Wallis对”];母猪[{x,y}]],{y,x+1,2.2*x}],{x,1,xmax}]][[2,1]];不可分解Q[{x0_,y0_}]:=(pf=对//展平;sx=交集[大多数@除数[x0],pf];sy=交叉[大多数@分区[y0],pf];xy=外部[List,sx,sy]//扁平[#,1]&;sel=选择[xy,WallisQ[#]&&WallisQ[{x0,y0}/#]&];sel=={});选择[pairs,uncomposableQ][[All,2]](*让-弗朗索瓦·奥尔科弗2013年9月26日*)
|
|
交叉参考
|
|
|
关键词
|
非n,美好的
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
搜索在0.006秒内完成
|