|
| |
|
| A183110号 |
| 注释中定义的映射下n 1的列表[1,1,1，…，1]的轨道的最终周期行为的周期长度。 |
|
三
|
|
|
|
1, 2, 1, 3, 3, 1, 4, 4, 4, 1, 5, 5, 5, 5, 1, 6, 6, 6, 6, 6, 1, 7, 7, 7, 7, 7, 7, 1, 8, 8, 8, 8, 8, 8, 8, 1, 9, 9, 9, 9, 9, 9, 9, 9, 1, 10, 10, 10, 10, 10, 10, 10, 10, 10, 1, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 1, 12, 12, 12, 12, 12, 12, 12, 12, 12, 12, 12, 1, 13, 13
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,2
|
|
|
评论
|
我们使用中介绍的列表映射A092964号其中，删除列表中的第一个项z（1），并在接下来的z（1”）项中的每个项上添加1（如果需要，添加1），以获得新列表。
|
|
|
链接
|
|
|
|
配方奶粉
|
如果n=t（k），a（n）=1；如果t（k-1）<n<t（k。
|
|
|
例子
|
在所示映射下，轨道[1,1,1,1,1]、[2,1,1,1,1]、[2,1,1,1,1,1]、[2,2,1,1,1]、[3,2,1,1]，[3,2,1]、[3],2]、[3,1]、[C,2,1]、[3],1]、。。。这显然是周期性的，周期长度为4，因此a（7）=4。
|
|
|
数学
|
f[p_]：=模块[｛pp，x，lpp，m，i｝，pp=p；x=pp[[1]；pp=删除[pp，1]；lpp=长度[pp]；m=最小值[x，lpp]；对于[i=1，i≤m，i++，pp[[i]]++]；对于[i=1，i≤x-lpp，i++，附录至[pp，1]]；pp]；orb[p_]：=模块[{s，v}，v=p；s={v}；而[！MemberQ[s，v=f[v]]，附加到[s，v]]；s] ；吸引子[p_]：=模[{orbp，pos，len，per}，orbp=orb[p]；pos=压扁[位置[orbp，f[orbp[[-1]]][[1]]-1；（*pos=输入句点的步骤*）len=长度[orbp]-pos；per=取[orbp，-len]；排序[每]]；a={}；对于[n=1，n≤80，n++，{rn=表[1，{k，1，n}]；orbn=orb[rn]；lenorb=长度[orbn]；lenattr=长度[吸引子[rn]]；附加到[a，lenattr]}]；打印[a]；
|
|
|
交叉参考
|
|
|
|
关键词
|
非n，容易的
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
