|
|
|
|
#47通过阿洛伊斯·海因茨2018年7月12日星期四08:57:35 EDT |
|
|
|
#46通过阿洛伊斯·海因茨2018年7月12日星期四08:57:32 EDT |
| 链接
|
_唐·雷布尔_<<a href=“/A072942号/b072942.txt“>n表,n=1..47时为a(n)</a>
_唐·雷布尔_, <, <a href=“/A072942号/a072942.txt“>n的表,n=1..99的a(n)(未知条目处有问号)
|
| 状态
|
经核准的
编辑
|
|
|
|
#45通过布鲁诺·贝塞利2018年2月25日星期日09:17:56 EST |
|
|
|
#44通过米歇尔·马库斯2018年2月25日星期日05:19:51 EST |
|
|
|
#43通过迈克尔·德·维利格2018年1月31日星期三22:23:10 EST |
|
|
讨论
|
2月1日星期四
| 01:52
| 托马斯·奥多夫斯基:它必须是bigomega,并假设x>2。
|
2月25日周日
| 05:19
| 米歇尔·马库斯:嗯。。。它对小n有效,但我无法检查a(12),也没有更高
|
|
|
|
#42通过迈克尔·德·维利格2018年1月31日星期三22:22:18 EST |
| 数学
|
表[With[{d=除数@n},SelectFirst[Range[10^3],AllTrue[Cyclotomic[d,#],PrimeQ]&]],{n,11}](*迈克尔·德·维利格2018年1月31日*)
|
| 状态
|
提出
编辑
|
|
|
讨论
|
1月31日星期三
| 22:23
| 迈克尔·德·维利格:我得到了与Michel相同的结果,即a(11)=2 via A001221和A000005 vs.20,如序列中所示。
|
|
|
|
#41通过米歇尔·马库斯2018年1月31日星期三16:14:28 EST |
|
|
|
#40通过米歇尔·马库斯2018年1月31日星期三16:14:23 EST |
|
|
|
#39通过罗伯特·伊斯雷尔2018年1月31日星期三15:26:40 EST |
|
|
|
#38通过罗伯特·伊斯雷尔2018年1月31日星期三15:26:05 EST |
| MAPLE公司
|
f: =proc(n)局部p,C,x,d;
C: =[seq(数论:-分圆(d,x),d=数论:-除数(n)减{1})];
p: =1;
做
p: =下一素数(p);
如果andmap(isprime,subs(x=p+1,C)),则返回p+1 fi
日期:
结束进程:
地图(f,[1..29]美元)#罗伯特·伊斯雷尔2018年1月31日
|
|
|
|