A195183-OEIS公司

A195183号

素数标记序列的分形A089026号.

三

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

	抵消	`1,3`
	评论	`请参见A194959号用于讨论序列分形诱导的分形和散布。（主要标记序列A089026号如果n是素数，则由p（n）=n定义，否则由p（n）=1定义。）`
	链接	`G.C.格鲁贝尔，n=1..5000时的n，a（n）表`
	数学	`表[p[n]，{n，1，90}](A089026号)` `g[1]={1}；g[n_]：=插入[g[n-1]，n，p[n]]` `f[1]=g[1]；f[n_]：=连接[f[n-1]，g[n]]` `f[20]页(A195183号)` `行[n_]：=位置[f[30]，n]；` `u=表格形式[表格[行[n]，{n，1，5}]]` `v[n_，k_]：=部分[行[n]，k]；` `w=扁平[表[v[k，n-k+1]，{n，1，13}，{k，1，n}]](A195184号)` `q[n_]：=位置[w，n]；压扁[表[q[n]，{n，1，80}]](1995年1月)`
	交叉参考	`囊性纤维变性。A194959号,A089026号,A195184号,A195185号.` `上下文中的序列：A066016号 A098068号 A194070号A194841号 A194911型 A194865号` `相邻序列：A195180型 A195181号 A195182号A195184号 A195185号 A195186号`
	关键词	`非n`
	作者	`克拉克·金伯利2011年9月10日`
	状态	`经核准的`

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

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

上次修改时间：美国东部夏令时2024年4月19日18:05。包含371798个序列。（在oeis4上运行。）