|
| |
|
| A216999型 |
| 使用加法、乘法和减法以n个步骤从1中获得的整数数。 |
|
10
|
|
|
|
1, 3, 6, 13, 38, 153, 867, 6930, 75986, 1109442, 20693262, 477815647
(列表；图表；参考；听；历史；文本；内部格式)
|
|
|
|
抵消
|
0,2
|
|
|
评论
|
直线程序是一个从1开始的序列，每个条目都是通过加法、乘法或减法从前面的两个条目中获得的。S（n）是在直线程序中使用n个步骤在任意点获得的整数集。因此S（0）={1}，S（1）={0,1,2}，S（2）={-1,0,1,2,3,4}；这里的序列是S（n）的基数。
|
|
|
链接
|
|
|
|
数学
|
extend[p_]：=模块[{q=Tuples[p，{2}]，new}，
new=扁平[表[{总计[t]，减法@@t，次数@@t}，{t，q}]]；
联合[Sort/@DeleteCase[Table[If[！MemberQ[p，n]，Append[p，n]]，{n，new}]，Null]]]；
P[0]={{1}}；
P[n_]：=P[n]=删除重复项[Flatten[extend/@P[n-1]，1]]；
S[n_]：=删除重复项[Flatten[P[n]]]；
长度/@S/@范围[6]
|
|
|
交叉参考
|
|
|
|
关键词
|
非n,更多,坚硬的,美好的
|
|
|
作者
|
|
|
|
扩展
|
a（9）-a（11）（迈克尔·科利尔独立验证了1109442、20693262值）吉尔·多根2013年9月27日
|
|
|
状态
|
经核准的
|
| |
|
|
