登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)

修订历史记录A272600型

(带下划线的文本是附加;删除线文本是删除.)

显示条目1-10|较旧的更改
A272600型 合成k,使得p-1将k-1除以k-1的每个素数因子。
(历史;已发布版本)
#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日

查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|转换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间:美国东部夏令时2024年6月21日20:04。包含373559个序列。(在oeis4上运行。)