A191770-OEIS公司

A191770型

极限f（f（…f（n）…）其中f（n）是分形序列A022446号.

1, 2, 3, 1, 1, 2, 1, 3, 1, 1, 2, 2, 1, 1, 3, 1, 3, 1, 1, 2, 2, 1, 1, 1, 3, 1, 3, 1, 2, 1, 2, 2, 2, 1, 1, 1, 1, 3, 1, 3, 1, 1, 3, 2, 1, 2, 1, 2, 2, 1, 1, 1, 3, 1, 3, 1, 3, 1, 1, 1, 1, 3, 2, 1, 2, 1, 2, 2, 2, 1, 2, 1, 1, 1, 3, 1, 3, 1, 1, 3, 1, 1, 1, 1, 1, 3 (列表;图表;参考;听;历史;文本;内部格式)

	抵消	`1,2`
	评论	假设f（1），f（2）。。。是一个分形序列（例如1、2、1、2和3、1、3和4、1、1和3、4、5、1和2、3、4和5、5和6…，它包含自己作为一个适当的子序列-如果删除每个n的第一个出现，其余的序列与原始序列相同；请参阅维基百科文章以获取严格的定义）。然后，对于每个n>=1，复合材料f（f（f.…f（n）…）的极限L（n）存在，并且是集合{k:f（k）=k}中的数字之一。如果f（2）>2，则L（n）=1表示所有n；如果f（2）=2且f（3）>3，则L（n）等于所有n的1或2。示例：A020903号,A191770型,A191774号.
	链接	`n=1..86时的n，a（n）表。` `维基百科，分形序列`
	例子	`写出计数数字和A022446号像这样：` `1..2..3..4..5..6..7..8..9..10..11..12..13..14..15..` `1..2..3..1..4..2..5..8..1..4...6...2...7...5...3...` `然后很容易检查复合材料：` `1->1, 2->2, 3->3, 4->1, 5->4->1, 6->2, 7->5->4->1,...`
	数学	`g[n_]：=长度[Select[Table[FixedPoint[i+PrimePi[#]+1&，i+Prime Pi[i]+1]，{i，n}]，#<=n&]]；` `f[n_]：=PrimePi[NestWhile[g，n，！PrimeQ[#]&&#！=1 &]] + 1;` `数组[f，80](A022446号)` `h[n_]：=嵌套[f，n，40]；t=表格[h[n]，{n，1300}](A191770型)` `压扁[位置[t，1]](A191771号)` `压扁[位置[t，2]](A191772号)` `压扁[位置[t，3]](A191773号)`
	交叉参考	`囊性纤维变性。A020903号,A191770型,A191771号,A191772号,A191773号,A191774号.` `上下文中的序列：A328231型 A180466号 A105083号A120966号 A189041号 A055444号` `相邻序列：A191767号 A191768号 A191769号A191771号 A191772号 A191773号`
	关键词	`非n`
	作者	`克拉克·金伯利2011年6月16日`
	状态	`已批准`