搜索: a269167-编号:a269177
|
|
|
|
1, 7, 2, 25, 9, 14, 3, 111, 33, 63, 11, 50, 18, 13, 4, 401, 143, 231, 41, 193, 79, 53, 15, 222, 66, 126, 22, 51, 17, 28, 5, 1783, 529, 945, 175, 825, 295, 223, 55, 839, 257, 497, 95, 203, 69, 49, 19, 802, 286, 462, 82, 386, 158, 106, 30, 221, 67, 119, 21, 100, 36, 27, 6, 6409, 2295, 3703, 657, 3159, 1201, 849, 233
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,2
|
|
评论
|
|
...................1...................
7 2
25......../ \........9 14......../ \........三
/ \ / \ / \ / \
/ \ / \ / \ / \
/ \ / \ / \ / \
111 33 63 11 50 18 13 4
401 143 231 41 193 79 53 15 222 66 126 22 51 17 28 5
等。
每个最大左分支(例如1、7、25(=A110240型)或9、63、193。。。或2、14、50…)给出了规则30元胞自动机的轨迹,从中给出的特定“种子配置”开始A269164型.
|
|
链接
|
|
|
配方奶粉
|
|
|
数学
|
nmax=(*序列长度*)100;条款(*来自A269164型*) = 2000; 清除[a,f];A269160型[n_]:=位X或[n,位或[2n,4n]];f[max_]:=f[max]=(s=排序[表格[A269160型[n] ,{n,0,最大}]];补码[Range[Last[s]],s][[1;;terms]]);f[条款];f[最大值=2项];而[f[max]!=f[最大值/2],最大值=2最大值];A269164型[n_Integer]:=如果[n>长度[f[max]],0,f[max][[n]]];a[1]=1;a[n_]:=a[n]=如果[EvenQ[n],A269160型[a[n/2]],A269164型[1+a[(n-1)/2]];A269168型=表[a[n],{n,1,nmax}](*让-弗朗索瓦·奥尔科弗2016年2月23日*)
|
|
黄体脂酮素
|
(方案,带有备忘录-宏定义)
|
|
交叉参考
|
|
|
关键词
|
|
|
作者
|
|
|
状态
|
已批准
|
|
|
|
|
|
|
1, 2, 3, 4, 5, 6, 6, 7, 8, 9, 10, 11, 11, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 21, 21, 21, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 41, 41, 41, 41, 41, 41, 42, 42, 43, 44, 45, 46, 47, 48, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,2
|
|
评论
|
|
|
链接
|
|
|
配方奶粉
|
其他身份。对于所有n>=1:
|
|
数学
|
术语=100;清除[f];f[max_]:=f[max]=(s=排序[表[BitXor[n,BitOr[2 n,4 n]],{n,0,max}]];补码[Range[Last[s]],s][[1;;terms]]);f[条款];f[最大值=2项];当[打印[max];f[最大值]!=f[最大值/2],最大值=2最大值];A269164型=f[最大值];a[n_]:=计数[A269164型,k_/;k≤n];表[a[n],{n,1,长度[A269164型]}] (*让-弗朗索瓦·奥尔科弗2016年2月23日*)
|
|
黄体脂酮素
|
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
状态
|
已批准
|
|
|
搜索在0.004秒内完成
|