|
| |
|
| A304816型 |
| 互补方程a（n）=b（4n）+b（5n）的解（b（n））；请参阅注释。 |
|
三
|
|
|
|
1, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 14, 15, 16, 17, 18, 19, 20, 21, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 34, 35, 36, 37, 38, 39, 40, 41, 42, 44, 45, 46, 47, 48, 49, 50, 51, 52, 54, 55, 56, 57, 58, 59, 60, 61, 62, 64, 65, 66, 67, 68, 69, 70, 71, 73, 74, 75
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
0,2
|
|
|
评论
|
递归定义互补序列a（n）和b（n）：
b（n）=最少新的，
a（n）=b（4n）+b（5n），
其中“最小新”表示尚未放置的最小正整数。经验上，{a（n）-8*n:n>=0}={2,3}和{7*b（n）.8*n:n>=0{8,9,10,11,12,13,14,15,16,17}。请参见A304799型有关相关序列的指南。
|
|
|
链接
|
|
|
|
例子
|
b（0）=1，因此a（0）=2。由于a（1）=b（4）+b（5），我们必须有a（1。
|
|
|
数学
|
mex[list_，start_]：=（NestWhile[#+1&，start，MemberQ[list，#]&]）；
h=4；k=5；a={}；b={1}；
附加到[a，mex[扁平[{a，b}]，1]]；
Do[Do[AppendTo[b，mex[Flatten〔｛a，b｝〕，Last〔b〕〕，｛k｝〕；
附加到[a，最后[b]+b[[1+（长度[b]-1）/k h]]]，{500}]；
|
|
|
交叉参考
|
|
|
|
关键字
|
非n,容易的
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
