登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A135063号 用b_n(0)=0定义序列{b_n;bn(米)=A000005美元(b_n(m-1)+n),对于所有m>=1。那么a(n)是最小的正整数,因此b_n(m)=b_n。 2
1, 2, 1, 1, 1, 1, 3, 2, 1, 1, 1, 1, 2, 1, 1, 2, 1, 1, 2, 3, 1, 1, 1, 2, 2, 2, 1, 2, 1, 1, 1, 3, 2, 1, 1, 2, 2, 2, 1, 2, 1, 2, 4, 1, 3, 1, 3, 1, 2, 2, 1, 4, 1, 1, 2, 3, 1, 1, 1, 1, 2, 1, 2, 3, 1, 2, 2, 5, 1, 1, 1, 1, 2, 2, 2, 2, 2, 1, 4, 3, 1, 1, 1, 1, 2, 1, 1 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,2
链接
例子
{b_7(m)}是0,2,3,4,2,3,4,。。。,然后重复(2,3,4)。因此a(7)=3,重复子序列(2,3,4)的长度。
MAPLE公司
b:=proc(n,m)选项记忆;如果m=0,则为0;else数理论[tau](procname(n,m-1)+n);结束条件:;结束过程:
A135063号:=进程(n)bseq:=[];对于0中的m,do bs:=b(n,m);如果成员(bs,bseq,'w'),则返回1+nops(bseq)-w;else bseq:=[操作(bseq),bs];结束条件:;结束do:end proc:seq(A135063号(n) ,n=1..120)#R.J.马塔尔2010年8月9日
数学
b[n_,m_]:=b[n,m]=如果[m==0,0,DivisorSigma[0,b[n、m-1]+n]];
A135063号[n_]:=模[{bseq={}},对于[m=0,真,m++,bs=b[n,m];w=位置[bseq,bs];如果[w!={},返回[1+长度[bseq]-w[1,1]],附加到[bseq,bs]]];
表[A135063号[n] ,{n,1,120}](*Jean-François Alcover公司,2024年2月8日,之后R.J.马塔尔*)
黄体脂酮素
(PARI)a(n)=我的(b,k,v=列表([0]));直到(k<v,k=1;listput(v,b=numdiv(b+n));直到(v[k]==b|k==v,k++))#v-k\\王金源2021年8月22日
交叉参考
囊性纤维变性。A000005美元,A135062号.
关键词
非n
作者
勒罗伊·奎特2007年11月15日
扩展
a(12)以外的条款R.J.马塔尔2010年8月9日
状态
经核准的

查找|欢迎|维基|注册|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间:2024年4月16日18:51 EDT。包含371750个序列。(在oeis4上运行。)