|
|
|
|
|
|
|
|
|
#15通过阿洛伊斯·海因茨2020年7月24日星期五15:58:47 EDT |
|
|
|
|
|
|
|
#14通过阿米拉姆·埃尔达尔2020年7月24日星期五15:58:11 EDT |
|
|
|
|
|
|
|
#13通过Jean-François Alcover公司美国东部时间2020年7月24日星期五06:55:34 |
|
|
|
|
|
|
|
#12通过Jean-François Alcover公司2020年7月24日星期五06:55:26 EDT |
|
| 数学
|
filterQ[x_]：=Catch[With[{d=Select[Divisors[x]，#^2>x&]}，Do[If[IntegerQ[Sqrt[（u-x/u）/2]]，Throw[True]]，{u，d}]；投掷[假]]；
filterQ[0]=真；
选择[Range[0，1000]，filterQ](*Jean-François Alcover公司2020年7月24日之后罗伯特·伊斯雷尔*)
|
|
| 状态
|
经核准的
编辑
|
|
|
|
|
|
|
#11通过布鲁诺·贝塞利2017年11月7日星期二03:02:31 EST |
|
|
|
|
|
|
|
#10通过查尔斯·格里特豪斯四世2017年11月6日星期一22:39:32 EST |
|
|
|
|
|
|
|
#9通过查尔斯·格里特豪斯四世2017年11月6日星期一22:38:28 EST |
|
| 评论
|
可表示为乘积u*v且（u-v）/2为a的非负整数 积极的正方形。
|
|
| 状态
|
提议的
编辑
|
|
|
|
|
|
|
#8通过罗伯特·伊斯雷尔2017年11月6日星期一22:05:16 EST |
|
|
|
|
|
|
|
#7通过罗伯特·伊斯雷尔2017年11月6日星期一美国东部标准时间22:00:40 |
|
| 链接
|
Robert Israel，<a href=“/A152411号/b152411.txt“>n，a（n）表，n=1.-10000</a>
|
|
| MAPLE公司
|
过滤器：=proc（x）局部d，u；
d： =选择（t->t^2>x，数字：-除数（x））；
对于d中的u，如果issqr（（u-x/u）/2），则返回真fiod；
假
结束进程：
过滤器（0）：=真：
选择（过滤器，[0..1000]）#罗伯特·伊斯雷尔2017年11月6日
|
|
| 状态
|
经核准的
编辑
|
|
|
|
|
|
|
#6通过N.J.A.斯隆2013年5月1日星期三美国东部夏令时21:13:44 |
|
| 作者
|
_N.J.A.斯隆,_,2009年10月24日，基于来自的电子邮件乔格·阿恩特2009年10月10日
|
|
|
|
|
讨论
|
| 2001年5月3日
| 21:13
| OEIS服务器: https://oeis.org/edit/global/1903
|
|
|
|
|
|
