|
|
|
|
|
|
|
|
|
#15通过布鲁诺·贝塞利2014年9月11日星期四08:49:42 EDT |
|
|
|
|
|
|
|
#14个通过乔格·阿恩特美国东部时间2014年9月11日星期四08:39:52 |
|
|
|
|
|
|
|
#13通过罗伯特·普莱斯2014年9月10日星期三17:35:48 EDT |
|
|
|
|
|
讨论
|
| 9月10日星期三
| 20时26分
| 罗伯特·普莱斯：这种情况下偏移量应该为零吗？
|
| 9月11日星期四
| 08:39
| 乔格·阿恩特：偏移量应为1，因为这是一个列表。
|
|
|
|
|
|
|
#12通过罗伯特·普莱斯2014年9月10日星期三17:35:41 EDT |
|
|
|
|
|
|
|
#11通过罗伯特·普莱斯2014年9月10日星期三17:35:13 EDT |
|
| 数据
|
3,4, 7, 19, 62, 94, 722, 5197, 5262, 6182, 14007, 21579, 35354, 75592
|
|
| 扩展
|
前缀 一(1)=3 和 Mathematica程序由更正罗伯特·普莱斯2014年9月9日
|
|
|
|
|
|
|
#10个通过罗伯特·普莱斯2014年9月10日星期三17:34:34 EDT |
|
| 数学
|
a={0,0,1,2}；打印[3];对于[n=4，n<=1000，n++，sum=Plus@@a；如果[PrimeQ[sum]，打印[n]]；a=向左旋转[a]；a[[4]]=总和
|
|
| 状态
|
提出
编辑
|
|
|
|
|
|
|
#9通过罗伯特·普莱斯2014年9月9日星期二21:28:27 EDT |
|
|
|
|
|
|
|
#8通过罗伯特·普莱斯2014年9月9日星期二21:28:13 EDT |
|
| 数学
|
a={0,0,1,2}；打印[1];打印[2];对于[n=4，n<=1000，n++，sum=Plus@@a；如果[PrimeQ[sum]，打印[n]]；a=向左旋转[a]；a[[4]]=总和
|
|
| 扩展
|
Mathematica程序由更正罗伯特·普莱斯2014年9月9日
|
|
| 状态
|
经核准的
编辑
|
|
|
|
|
|
|
#7通过拉尔夫·斯蒂芬2014年5月10日星期六12:06:34 EDT |
|
|
|
|
|
|
|
#6通过乔格·阿恩特2014年4月28日星期一02:20:39 EDT |
|
|
|
|
|
|
