|
|
|
|
|
|
|
|
|
#24通过韦斯利·伊万·赫特2022年1月15日星期六21:40:25 EST |
|
|
|
|
|
|
|
#23通过韦斯利·伊万·赫特2022年1月15日星期六21:40:11 EST |
|
| 名称
|
数字n个k个这样的非犯罪(n个k个)划分n个k个^2.
|
|
| 状态
|
经核准的
编辑
|
|
|
|
|
|
|
#22通过哈维·P·戴尔2014年9月10日星期三19:33:40 EDT |
|
|
|
|
|
|
|
#21通过哈维·P·戴尔美国东部时间2014年9月10日星期三19:33:31 |
|
| 数学
|
模[{nn=10^7，np，len}，np=补码[Range[nn]，素数[Range[PrimePi[[nn]]]；len=长度[np]；转置[Select[Thread[{Range[len]，np}]，Divisible[First[#]^2，Last[#]]&]][1](*哈维·P·戴尔2014年9月10日*）
|
|
|
|
|
|
|
#20通过哈维·P·戴尔2014年9月10日星期三19:33:09 EDT |
|
| 数学
|
模[{nn=10^7，np，len}，np=补码[Range[nn]，素数[[范围[[PrimePi[nn]]]；len=长度[np]；转置[选择[[螺纹[{[ {Range[len]，np}]，Divisible[第一个[#]^2，最后一个[#]]&]][[1]]](*哈维·P·戴尔2014年9月10日*）
|
|
|
|
|
|
|
#19通过哈维·P·戴尔2014年9月10日星期三19:32:34 EDT |
|
| 数学
|
模[{nn=10^7，np，len}，np=补码[Range[nn]，素数[Range[PrimePi[nn]]]；len=长度[np]；转置[Select[Thread[{Range[len]，np}]，Divisible[First[#]^2，Last[#]]&]][1](*哈维·P·戴尔2014年9月10日*）
|
|
| 状态
|
经核准的
编辑
|
|
|
|
|
|
|
#18通过布鲁诺·贝塞利2013年6月4日星期二美国东部夏令时05:06:39 |
|
|
|
|
|
|
|
#17通过R.J.马塔尔2013年6月4日星期二05:05:59 EDT |
|
|
|
|
|
|
|
#16通过R.J.马塔尔2013年6月4日星期二05:05:47 EDT |
|
|
|
|
|
|
|
#15通过R.J.马塔尔2013年6月4日星期二05:05:01 EDT |
|
| MAPLE公司
|
从1到n do
如果n^2 modA018252号（n） =0那么
打印（n）；
结束条件：；
结束do：#R.J.马塔尔2013年6月4日
|
|
| 交叉参考
|
参见。A018252号,A0226018号.
|
|
| 关键字
|
非n,较少的,改变
|
|
| 状态
|
提出
编辑
|
|
|
|
|
|
