搜索: a092049-编号:a092049
|
|
|
|
1, 2, 3, 4, 10, 70, 72, 182, 440, 1053, 6458, 6461, 6471, 40087, 40089, 251737, 251742, 637320, 637334, 637336, 1617173, 4124466, 10553445, 10553455, 10553569, 10553570, 10553574, 10553576, 10553819, 10553829, 27067100, 27067262, 69709705, 69709719, 69709734, 69709873
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,2
|
|
评论
|
也对n进行编号,使素数(n)==n-1(mod n)-穆尼鲁A阿西鲁2018年7月24日
|
|
链接
|
|
|
例子
|
10是一个成员,因为第10个素数29与-1 mod 10全等。
|
|
数学
|
NextPrim[n_]:=块[{k=n+1},While[!PrimeQ[k],k++];k] ;p=1;Do[If[Mod[p=NextPrim[p],n]==n-1,Print[n]],{n,1,10^9}](*罗伯特·威尔逊v2004年2月18日*)
|
|
黄体脂酮素
|
(PARI)isok(n)=Mod(素数(n),n)==-1\\米歇尔·马库斯2018年7月24日
|
|
交叉参考
|
参见。A052013号,A048891号,A092044号,A092045美元,A092046号,A092047号,A092048号,A092049号,A092050型,A092051号,A092052号,A008864号.
|
|
关键字
|
非n
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
|
|
|
|
1, 11, 71, 637319, 637323, 637327, 179993015, 1208198861, 8179002163, 8179002189, 55762149067, 55762149103, 6201265271239787, 43525513764814971, 43525513764815121, 2159986889494444325, 2159986889494445481, 2159986889494445499, 2159986889494447181
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,2
|
|
链接
|
|
|
数学
|
NextPrim[n_]:=块[{k=n+1},While[!PrimeQ[k],k++];k] ;p=1;Do[If[Mod[p=NextPrim[p],n]==n-2,Print[n]],{n,1,10^9}]
|
|
黄体脂酮素
|
(PARI)对于(i=1,10^9,如果(Mod(质数(i),i)==-2,打印1(i,“,”));
|
|
交叉参考
|
|
|
关键字
|
非n
|
|
作者
|
|
|
扩展
|
由Mohammed Bouayoun(bouyao(AT)wanadoo.fr)更正,2004年2月20日
|
|
状态
|
经核准的
|
|
|
|
|
|
|
1, 2, 4, 6, 18, 36, 78, 191, 6456, 6457, 40080, 40081, 637324, 637326, 637344, 10553425, 10553434, 10553477, 10553502, 10553573, 10553854, 27066988, 27067126, 69709680, 69709736, 69709940, 465769818, 3140421716, 3140421740, 3140421743
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,2
|
|
链接
|
|
|
数学
|
p=1;Do[If[Mod[p=NextPrime[p],n]==7,Print[n]],{n,1,10^9}](*罗伯特·威尔逊v2004年2月18日*)
|
|
黄体脂酮素
|
(鼠尾草)
条款=[]
p=2
对于范围(1,最大值+1)内的n:
如果(p-7)%n==0:术语.append(n)
p=下一素数(p)
退货条款
|
|
交叉参考
|
参见。171434英镑,A092049号,A023143号,A023144号,A023145号,A023146号,A023147号,A023148号,A023150型,A023151号,A023152号.
|
|
关键字
|
非n
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
|
|
|
|
1, 2, 25, 26, 68, 1054, 1058, 6472, 251723, 4124468, 69709727, 69709942, 465769817, 465769835, 1208198860, 8179002154, 8179002176, 8179002178, 145935689360, 145935689369, 145935689392, 145935689393
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,2
|
|
链接
|
|
|
数学
|
NextPrim[n_]:=块[{k=n+1},While[!PrimeQ[k],k++];k] ;p=1;Do[If[Mod[p=NextPrim[p],n]==n-3,Print[n]],{n,1,10^9}]
连接[{1,2},选择[Range[5 10^6],Mod[Prime[#],#]=#-3&]](*哈维·P·戴尔2023年3月29日*)
|
|
交叉参考
|
|
|
关键字
|
非n
|
|
作者
|
|
|
扩展
|
由Mohammed Bouayoun(bouyao(AT)wanadoo.fr)更正,2004年2月20日
|
|
状态
|
经核准的
|
|
|
|
|
|
|
1, 2, 4, 5, 17, 19, 20, 22, 23, 64, 1055, 1057, 6463, 251708, 251743, 251744, 251755, 251758, 27067054, 27067118, 27067138, 69709681, 69709703, 69709712, 145935689366, 382465573490, 382465573498, 6935812012621, 126979448983610, 885992692751476
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,2
|
|
链接
|
|
|
数学
|
NextPrim[n_]:=块[{k=n+1},While[!PrimeQ[k],k++];k] ;p=1;Do[If[Mod[p=NextPrim[p],n]==n-9,Print[n]],{n,1,10^9}]
|
|
交叉参考
|
|
|
关键字
|
非n
|
|
作者
|
|
|
扩展
|
由Mohammed Bouayoun(bouyao(AT)wanadoo.fr)更正,2004年2月20日
|
|
状态
|
经核准的
|
|
|
|
|
|
|
1, 3, 5, 7, 9, 67, 441, 2615, 637237, 637329, 4124703, 27067119, 179993017, 1208198617, 8179002101, 55762149071, 55762149091
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,2
|
|
链接
|
|
|
数学
|
NextPrim[n_]:=块[{k=n+1},While[!PrimeQ[k],k++];k] ;p=1;Do[If[Mod[p=NextPrim[p],n]==n-4,Print[n]],{n,1,10^9}]
|
|
交叉参考
|
|
|
关键字
|
非n
|
|
作者
|
|
|
扩展
|
由Mohammed Bouayoun(bouyao(AT)wanadoo.fr)更正,2004年2月20日
|
|
状态
|
经核准的
|
|
|
|
|
|
|
1, 2, 4, 6, 8, 27, 28, 169, 183, 187, 188, 189, 438, 442, 1056, 1059, 40084, 40088, 40091, 40114, 40121, 100348, 251709, 4124588, 10553499, 10553853, 27066972, 179992914, 179992932, 179993012, 465769812, 1208198618, 1208198852
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,2
|
|
链接
|
|
|
数学
|
NextPrim[n_]:=块[{k=n+1},While[!PrimeQ[k],k++];k] ;p=1;Do[If[Mod[p=NextPrim[p],n]==n-5,Print[n]],{n,1,10^9}]
|
|
交叉参考
|
|
|
关键字
|
非n
|
|
作者
|
|
|
扩展
|
由Mohammed Bouayoun(bouyao(AT)wanadoo.fr)更正,2004年2月20日
|
|
状态
|
经核准的
|
|
|
|
|
|
|
1, 439, 100349, 100361, 100363, 27066991, 27067117, 1208198633, 8179002133
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,2
|
|
链接
|
|
|
数学
|
NextPrim[n_]:=块[{k=n+1},While[!PrimeQ[k],k++];k] ;p=1;Do[If[Mod[p=NextPrim[p],n]==n-6,Print[n]],{n,1,10^9}]
|
|
交叉参考
|
|
|
关键字
|
非n
|
|
作者
|
|
|
扩展
|
由Mohammed Bouayoun(bouyao(AT)wanadoo.fr)更正,2004年2月20日
|
|
状态
|
经核准的
|
|
|
|
|
|
|
1, 63, 435, 100347, 100353, 100359, 637335, 129992911, 129993001, 129993007, 129993171, 8179002121, 8179002123, 8179002177, 382465573539
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,2
|
|
评论
|
没有更多条款<2*10^12-大卫·沃瑟曼2005年6月9日
|
|
链接
|
|
|
数学
|
NextPrim[n_]:=块[{k=n+1},While[!PrimeQ[k],k++];k] ;p=1;执行[If[Mod[p=NextPrim[p],n]==n-8,打印[n]],{n,1,10^9}]
|
|
交叉参考
|
|
|
关键字
|
非n
|
|
作者
|
|
|
扩展
|
由Mohammed Bouayoun(bouyao(AT)wanadoo.fr)更正,2004年2月20日
|
|
状态
|
经核准的
|
|
|
|
|
|
|
1、3、437、2639、4124589、27067013、27067101、27067139、27067271、3824655573551、18262325820327、18262325820329、18262325820333、885992692751831、6201265271239783、6201265271239997、6201265271240071、6201265271240403、306268030480171331
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,2
|
|
链接
|
|
|
数学
|
NextPrim[n_]:=块[{k=n+1},While[!PrimeQ[k],k++];k] ;p=1;Do[If[Mod[p=NextPrim[p],n]==n-10,Print[n]],{n,1,10^9}]
|
|
交叉参考
|
|
|
关键字
|
非n,更多
|
|
作者
|
|
|
扩展
|
由Mohammed Bouayoun(bouyao(AT)wanadoo.fr)更正,2004年2月20日
|
|
状态
|
经核准的
|
|
|
搜索在0.004秒内完成
|