|
| |
| |
|
|
|
1, 3, 7, 13, 33, 47, 132, 458, 777, 853, 3845, 4395, 4783, 4983, 6038, 6487, 6719, 6957, 11707, 12030, 12688, 13025, 13365, 13709, 14057, 14409, 15861, 17789, 18598, 19008, 19845, 20272, 20702, 21135, 21570, 22010, 22458, 23378, 23850, 24326
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,2
|
|
|
评论
|
这些整数还形成了一种素数，用a[2*n]/3作为判别符。dd=展平[Table[If[IntegerQ[a[2*n]/3]==True，Prime[n]，{}]，{n，1，200}]2，3，5，7，13，17，31，67，89，97，227，239，251，257，281，293，307，311，419，421，433，439，443，449，457，461，487，521，541，547，563，569，571，577，587，593，599，607，613617、641、643、647、653、673、743、751、769、853、857、859、863、877、881、911、919、929、， 947, 953, 967, 977, 983, 991, 997, 1009, 1031, 1039, 1063
|
|
|
链接
|
|
|
|
配方奶粉
|
a（0）=1/2 a（n）=a（n-1）+素数[n]/2如果a[2*n]/3是整数，则aout=a[2*n]/3
|
|
|
数学
|
a[0]=1/2；a[n_]：=a[n]=a[n-1]+素数[n]/2 cc=Flatten[Table[If[IntegerQ[a[2*n]/3]==真，a[2*n]/3，{}]，{n，1，200}]]
|
|
|
交叉参考
|
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
