登录
OEIS基金会得到了OEIS用户的捐赠和西蒙斯基金会的资助。

 

标志

感谢每一位在我们的年度募捐活动中捐款的人!
要查看捐赠者列表或进行捐赠,请参见OEIS基金会主页。

提示
(问候来自整数序列在线百科全书!)
A273202型 最小成员A274720. 2
9、21、25、39、49、55、57、111、121、155、169、183、201、203、205、219、237、253、289、291、301、305、309、327、355、361、417、453、489、497、505、529、543、579、597、633、655、689、723、737、755、791、813、841、889、905、921、939、955、961、979、993、1011 (列表;图表;参考文献;;历史;文本;内部格式)
抵消

1,1

评论

成员nA274720使得n的非平凡除数不在A274720.

成员包括:

p^(b+1),其中p是奇素数,b是最大指数k,使得p^k除以2^(p-1)-1(特别是b=1,如果p不是Wieferich素数)。

p*q,其中p<q是奇素数,p除以2模q的阶。

链接

罗伯特·以色列,n=1..10000的n,a(n)表

例子

39是会员,因为它在A274720它的非平凡除数3和13不在A274720.

枫木

N: =10000:#小于1093^2,所以我们不需要担心

#Wieferich素数

素数:=选择(isprime,[顺序(i,i=3..N/3)]):

S: ={}:

对于质数中的q

m:=数量-顺序(2,q);

ps:=numtheory:-因子集(m)并集{q}减{2};

S:=S联合选择(`<=`,map(`*`,ps,q),N)

外径:

排序(转换(S,list));

数学

A274720=选择[范围[1,2000,2]!CoprimeQ[MultiplicativeOrder[2,#],#]&];选择[A274720,非真[除数[#][[2;;-2]],MemberQ[A274720, #]&]&] (*让·弗朗索瓦·阿尔科弗2019年4月27日*)

交叉引用

囊性纤维变性。A001220型,A002326号,A274720

上下文顺序:A340482型 A324722型 A295230型*A338909飞机 A173456号 邮编:A192192

相邻序列:A273199号 A273200 A273201*A273203型 A273204号 A273205型

关键字

作者

罗伯特·以色列2016年7月27日

状态

经核准的

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

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

上次修改日期:美国东部时间2021年1月15日09:16。包含340187个序列。(运行在oeis4上。)