|
|
|
|
#19通过乔恩·肖恩菲尔德2015年3月12日星期四20:18:18 EDT |
|
|
|
#18通过乔恩·肖恩菲尔德2015年3月12日星期四20:18:15 EDT |
| 数学
|
f[n_]:=块[{c=0,k=3},While[k<=n/2,如果[PrimeQ[k]&&PrimeQ[n-k],c++];k++];c] ;a=表[0,{50}];a[[1]]=2;a[2]]=4;Do[m=n;b=f[n];如果[b<100,a[[b+1]]=n],{n,6,20000,2}] (从 }] (* _罗伯特·威尔逊v _,2003年12月20日)*)
|
| 状态
|
经核准的
编辑
|
|
|
|
#17通过乔恩·肖恩菲尔德2015年3月5日星期四12:36:01 EST |
|
|
|
#16通过乔恩·肖恩菲尔德2015年3月5日星期四12:35:57 EST |
| 作者
|
R.W.高斯珀
高斯珀
|
| 状态
|
经核准的
编辑
|
|
|
|
#15通过乔格·阿恩特2012年6月16日星期六05:25:32 EDT |
|
|
|
#14通过查尔斯·格里特豪斯四世2012年6月16日星期六03:57:31 EDT |
|
|
|
#13通过查尔斯·格里特豪斯四世2012年6月16日星期六03:57:26 EDT |
|
|
|
#12通过查尔斯·格里特豪斯四世2012年6月16日星期六美国东部夏令时03:57:15 |
|
|
|
#11通过查尔斯·格里特豪斯四世2012年6月16日星期六美国东部夏令时03:57:12 |
|
|
|
#10通过N.J.A.斯隆2010年11月11日星期四07:34:06 EST |
| 链接
|
T.D.Noe,<a href="="/A000954号/b000954.txt“>n,a(n)表,n=0..5000</a>
|
| 关键词
|
非n,新的
非n
|
|
|
|