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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A056652号 素数因子都是梅森素数的整数>1(即形式为(2^p-1))。 8
3, 7, 9, 21, 27, 31, 49, 63, 81, 93, 127, 147, 189, 217, 243, 279, 343, 381, 441, 567, 651, 729, 837, 889, 961, 1029, 1143, 1323, 1519, 1701, 1953, 2187, 2401, 2511, 2667, 2883, 3087, 3429, 3937, 3969, 4557, 5103, 5859, 6223, 6561, 6727, 7203, 7533, 8001, 8191, 8649, 9261 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,1
链接
阿米拉姆·埃尔达尔,n=1..10000时的n,a(n)表(Michael De Vlieger第1..471条)
配方奶粉
Sum_{n>=1}1/a(n)=-1+产品{p英寸A000668号}p/(p-1)=0.82292512097260346512-阿米拉姆·埃尔达尔2020年9月27日
例子
包含63是因为63的素因式分解是3^2*7=(2^2-1)^2*(2^3-1)。
MAPLE公司
isA000668:=进程(n)
如果n在[3,7,31,127,8191,131071,524287,2147483647,2305843009213693951,618970019642690137449562111,162259276829213363391578010288127,170141183460469231731687303715884105727]中,则
真;
其他的
假;
结束条件:;
结束进程:
isA056652:=进程(n)
局部p;
对于numtheory[因子集](n)do中的p
如果不是A000668(p),则
返回false;
结束条件:;
结束do:
真;
结束进程:
n从2到1000 do
如果是A056652(n),那么
printf(“%d,”,n);
结束条件:;
结束do:#R.J.马塔尔2017年2月19日
数学
块[{nn=10^4,s},s=TakeWhile[Select[2^Prime@Range@8-1,PrimeQ],#<=nn&];选择[Range@nn,AllTrue[FactorInteger[#][[All,1]],MemberQ[s,#]&]&]](*迈克尔·德弗利格2017年9月3日*)
黄体脂酮素
(PARI)isok(n)={if(n==1,return(0));my(f=factor(n));对于(k=1,#f~,if(!((q=ispower(f[k,1]+1,&e))\\米歇尔·马库斯2016年4月25日
交叉参考
囊性纤维变性。A000668号,A046528号
关键词
非n
作者
勒罗伊·奎特2000年8月9日
扩展
已更正的偏移和添加的更多术语米歇尔·马库斯2016年4月25日
状态
经核准的

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

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

上次修改时间:2024年4月26日11:58 EDT。包含371997个序列。(在oeis4上运行。)