A100002-OEIS公司

A100002号

从一个1的序列开始，然后用一个2替换每一个1；然后用3替换剩余1的三分之一，用3替换其余2的三分之二；然后用4替换剩余的每四分之一个1、2或3；以此类推。这里显示了限制序列。

1, 2, 1, 2, 3, 3, 1, 2, 4, 4, 3, 4, 1, 2, 5, 5, 3, 5, 1, 2, 4, 5, 3, 4, 6, 6, 1, 2, 6, 3, 7, 7, 6, 4, 7, 7, 5, 6, 1, 2, 5, 3, 8, 8, 7, 4, 8, 8, 1, 2, 6, 7, 3, 6, 5, 8, 4, 8, 5, 6, 9, 9, 1, 2, 9, 3, 10, 10, 9, 4, 10, 10, 7, 8, 9, 5, 7, 10, 1, 2, 9, 7, 3, 4, 9, 6, 11, 11, 10, 11 (列表；图表；参考；听；历史；文本；内部格式)

	抵消	`1,2`
	评论	`1的位置由下式给出A000960型. -T.D.诺伊2004年10月26日`
	链接	`T.D.Noe，n=1..10000时的n，a（n）表` `T.D.Noe，前5000个术语的绘图` `A类邮递在sci.math.research新闻组上。`
	配方奶粉	`对于所有j>=1，a（1，j）=1；a（n，j）=a（n-1，j），除非#{i<=j s.t.a（n-1，i）=a（n-1，j）}是n的倍数，在这种情况下a（n，j）=n；a（j）是当n趋于无穷大时（静止）a（n，j）的极限。` `看起来，前n项中的最大值增长为sqrt（4n/3）。` `注意，n的第一次出现是以A000960型; 也就是说，A100287号（n）<=A000960型（n），仅当n=1时相等-T.D.诺伊2004年11月12日`
	例子	`以下是施工的前6个阶段：` `1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1...` `1 2 1 2 1 2 1 2 1 2 1 2 1 2 1 2 1 2 1 2 1 2 1 2 1 2 1 2 1 2...` `1 2 1 2 3 3 1 2 1 2 3 3 1 2 1 2 3 3 1 2 1 2 3 3 1 2 1 2 3 3...` `1 2 1 2 3 3 1 2 4 4 3 4 1 2 1 2 3 3 1 2 4 4 3 4 1 2 1 2 3 3...` `1 2 1 2 3 3 1 2 4 4 3 4 1 2 5 5 3 5 1 2 4 5 3 4 1 2 1 2 3 3...` `1 2 1 2 3 3 1 2 4 4 3 4 1 2 5 5 3 5 1 2 4 5 3 4 6 6 1 2 6 3...` `...`
	数学	`nn=100；t=表[1，{nn}]；done=假；k=1；当[！done，k++；cnt=表[0，{k-1}]；Do[If[t[[i]]<k，cnt[[t[[i]]++；如果[Mod[cnt[[t[i]]]，k]==0，t[[i]=k]]，{i，nn}]；done=（最大[cnt]<k）]；t吨(T.D.诺伊)` `a[n_]：=折叠[Function[{b1，b2}，Fold[Function[{a1，a2}，ReplacePart[a1，Pick[Position[al，a2]，Take[Flatten[Array[{Array[0&，b2-1]，1}&，Length[a1]]，Length[Position[1a，a2]]，1]->b2]]，b1，Range[b2-1]]，Array[1&，n]，Range[2，2Sqrt[n/Pi]+1]]；a[100](Birkas Gyorgy公司2011年2月6日）`
	黄体脂酮素	`/C/#define MAXVAL 2048/足够大…/无符号整数计数[MAXVAL][MAXVAL]；/全部初始化为0/无符号int seq_value（void）/连续调用按顺序返回序列中的值。/{无符号int值；无符号int i；值=1；对于（i=2；i<MAXVAL；i++）if（++计数[i][value]>=i）{计数[i][value]=0；value=i；}返回值；}`
	交叉参考	`囊性纤维变性。A100287号（n的首次出现）。` `上下文中的序列：A071766号 A007305号 A112531号A348330型 A328471型 A227909型` `相邻序列：A099999型 A100000美元 A100001号A100003号 A100004号 A100005号`
	关键词	`容易的,美好的,非n`
	作者	`大卫·A·马多雷2004年10月25日`
	状态	`经核准的`