A130155-OEIS公司

A130155号

a（1）＝1。a（n）=除以第n个斐波那契数的序列的早期项数。

1, 1, 2, 2, 2, 5, 2, 2, 7, 3, 2, 9, 2, 2, 11, 4, 2, 12, 2, 5, 12, 2, 2, 20, 4, 2, 15, 3, 2, 22, 2, 5, 17, 2, 5, 26, 2, 2, 20, 11, 2, 24, 2, 4, 27, 2, 2, 34, 2, 8, 25, 4, 2, 33, 6, 5, 26, 2, 2, 52, 2, 2, 34, 5, 8, 36, 2, 4, 31, 10, 2, 52, 2, 2, 42, 4, 2, 43, 2, 15, 39, 2, 2, 59, 8, 2, 39, 6, 2, 65, 2 (列表;图表;参考文献;听;历史;文本;内部格式)

	抵消	`1,3`
	链接	`T.D.Noe，n=1..1000时的n，a（n）表`
	例子	`第十个斐波那契数是55。在项（a（1）、a（2）、…、。。。，a（9））有3个项（a（1）=1，a（2）=1、a（6）=5）除以55，因此a（10）=3。`
	MAPLE公司	`A130155号：=proc（nmax）local a，nfib，new，i；a:=[1]；而nops（a）<nmax do n：=nops（a）+1；nfib:=组合[fibonacci]（n）；重新：=0；对于i从1到nops（a），如果nfib-mod-op（i，a）=0，那么new:=new+1；fi；od；a:=[运算（a），重新计算]；od；返回（a）；结束时间：A130155号(100) ; #R.J.马塔尔2007年6月7日`
	数学	`seq[nmax_]：=模块[{a，nfib，new，i}，a={1}；而[Length[a]<nmax，n=长度[a]+1；nfib=斐波那契[n]；new=0；对于[i=1，i<=长度[a]，i++，如果[Mod[nfib，a[i]]==0，new=new+1]]；附录【a，new】】；返回[a]]；序列[100](Jean-François Alcover公司2013年11月18日，翻译自枫叶）` `nn=1000；t＝｛1｝；Do[cnt=0；fibn=Fibonacci[n]；做[If[Mod[fibn，t[[k]]==0，cnt++]，{k，n-1}]；附加到[t，cnt]，{n，2，nn}]；t吨(T.D.诺伊2013年11月18日）`
	交叉参考	`囊性纤维变性。A130156号.` `上下文中的序列：A112659号 A342550型 A115281号A350403型 A113516号 A226525型` `相邻序列：A130152号 A130153号 A130154号A130156号 A130157号 A130158号`
	关键字	`非n`
	作者	`勒罗伊·奎特2007年5月13日`
	扩展	`更多术语来自R.J.马塔尔2007年6月7日`
	状态	`经核准的`

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

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

上次修改时间：2024年4月23日23:26 EDT。包含371917个序列。（在oeis4上运行。）