|
|
|
|
#23通过哈维·P·戴尔2024年2月26日星期一东部标准时间15:43:07 |
|
|
|
#22通过哈维·P·戴尔2024年2月26日星期一东部标准时间15:43:05 |
| 数学
|
pdkQ[n_]:=模块[{p=FactorInteger[n-1][[;;,1]]-1},AllTrue[(n-1)/p,IntegerQ]];选择[Range[1550],CompositeQ[#]&&pdkQ[#]&](*哈维·P·戴尔2024年2月26日*)
|
| 状态
|
经核准的
编辑
|
|
|
|
#21通过约尔格·阿恩特2024年2月16日星期五01:29:27 EST |
|
|
|
#20通过约尔格·阿恩特2024年2月16日星期五01:28:46 EST |
| 名称
|
混合成的复合材料 n个k个p-1除以n个k个-的每个素数为1n个k个-1.
|
|
|
|
#19通过保罗·拉瓦2024年2月15日星期四10:14:16 EST |
| MAPLE公司
|
使用(数字理论):P:=proc(n)局部a,k,ok;
如果不是素数(n+1),则a:=因子集(n);确定:=1;
对于从1到nops(a)的k,如果frac(n/(a[k]-1))>0,则确定:=0;
断裂;fi;od;如果ok=1,则n+1;fi;fi;结束:seq(P(i),i=1..1501);
#保罗·拉瓦2018年5月18日
|
| 状态
|
经核准的
编辑
|
|
|
|
#18通过乔瓦尼·雷斯塔美国东部时间2018年5月18日星期五04:33:29 |
|
|
|
#17通过保罗·拉瓦2018年5月18日星期五04:33:07 EDT |
|
|
|
#16通过保罗·拉瓦2018年5月18日星期五04:33:04 EDT |
| MAPLE公司
|
断裂;fi;od;如果ok=1,则n+1;fi;fi;结束:seq(P(i),i=1。。10^21501);
|
| 状态
|
提出
编辑
|
|
|
|
#15通过保罗·拉瓦2018年5月18日星期五美国东部夏令时03:41:59 |
|
|
|
#14通过保罗·拉瓦2018年5月18日星期五美国东部夏令时03:41:44 |
| MAPLE公司
|
带有(numtheory):P:=proc(n)局部a,k,ok;如果 不 isprime(第一人称)(n个+1)然后 一:=因子集(n个);;
如果不是素数(n+1),则a:=因子集(n);确定:=1;
好 啊:=1;对于从1到nops(a)的k,如果压裂(n/(a[k]-1))>0,则确定:=0;打破;fi(菲涅耳);操作系统;
打破;fi(菲涅耳);操作系统;如果ok=1,则n+1;fi;fi;结束:seq(P(i),i=1..10^2); # _保罗 P(P).熔岩_,五月 18 2018);
#保罗·拉瓦2018年5月18日
|
|
|
|