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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A098282号 迭代映射k->A087712号(k) 从n开始;a(n)是我们首次看到重复项的步骤数;如果轨迹从不重复,则为-1。 14
1, 2, 3, 6, 4, 31, 7, 55, 4, 33, 5, 30, 32, 1, 4, 19, 8, 112, 56, 16, 27, 4, 4, 26, 2, 20, 223, 102, 34, 14, 6, 162, 2, 9, 10, 75, 31, 113, 21, 100, 33, 20, 2, 23, 30, 57, 5, 28, 24, 30, 224, 269, 20, 295, 11, 85, 103, 140, 9, 71, 113, 55, 34, 110, 76, 49, 57 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,2
评论
带有此A编号的旧条目是A030298号.
a(52)目前未知-多诺万·约翰逊
a(52)-a(10000)是通过Mathematica和Kim Walisch的素数程序的结合发现的。素数计算函数的附加值可以在第二个a文件中找到-马修·豪斯2016年12月23日
链接
例子
1 -> 1; 1步查看重复,因此a(1)=1。
2 -> 1 -> 1; 重复两步。
3 -> 2 -> 1 -> 1; 三步看一次重复。
4->11->5->3->2->1->1;重复6个步骤。
6 -> 12 -> 112 -> 11114 -> 1733 -> 270 -> 12223 -> 7128 -> 11122225 -> 33991010 -> 13913661 -> 2107998 -> 12222775 -> 33910130 -> 131212367 -> 56113213 -> 6837229 -> 4201627 -> 266366 -> 112430 -> 131359 -> 7981 -> 969 -> 278 -> 134 -> 119 -> 47 -> 15 -> 23 -> 9 -> 22 -> 15; 31个步骤来重复。
9 -> 22 -> 15 -> 23 -> 9; 4步看一次重复。
发件人大卫·阿普尔盖特N.J.A.斯隆,2009年2月9日:(开始)
数字1到17的轨迹,直到并包括第一次重复,如下所示。注意,a(n)比所示的术语数少一个。
[1, 1]
[2, 1, 1]
[3, 2, 1, 1]
[4, 11, 5, 3, 2, 1, 1]
[5, 3, 2, 1, 1]
[6, 12, 112, 11114, 1733, 270, 12223, 7128, 11122225, 33991010, 13913661, 2107998, 12222775, 33910130, 131212367, 56113213, 6837229, 4201627, 266366, 112430, 131359, 7981, 969, 278, 134, 119, 47, 15, 23, 9, 22, 15]
[7, 4, 11, 5, 3, 2, 1, 1]
[8, 111, 212, 1116, 112211, 52626, 124441, 28192, 11111152, 111165448, 1117261018, 1910112963, 252163429, 42205629, 2914219, 454002, 127605, 231542, 110938, 15631, 44510, 13605, 23155, 3582, 12246, 12637, 1509, 296, 11112, 111290, 131172, 1127117, 76613, 9470, 13161, 21328, 11111114, 14142115, 3625334, 1125035, 348169, 78151, 11369, 1373, 220, 1135, 349, 70, 134, 119, 47, 15, 23, 9, 22, 15]
[9, 22, 15, 23, 9]
[10, 13, 6, 12, 112, 11114, 1733, 270, 12223, 7128, 11122225, 33991010, 13913661, 2107998, 12222775, 33910130, 131212367, 56113213, 6837229, 4201627, 266366, 112430, 131359, 7981, 969, 278, 134, 119, 47, 15, 23, 9, 22, 15]
[11, 5, 3, 2, 1, 1]
[12, 112, 11114, 1733, 270, 12223, 7128, 11122225, 33991010, 13913661, 2107998, 12222775, 33910130, 131212367, 56113213, 6837229, 4201627, 266366, 112430, 131359, 7981, 969, 278, 134, 119, 47, 15, 23, 9, 22, 15]
[13, 6, 12, 112, 11114, 1733, 270, 12223, 7128, 11122225, 33991010, 13913661, 2107998, 12222775, 33910130, 131212367, 56113213, 6837229, 4201627, 266366, 112430, 131359, 7981, 969, 278, 134, 119, 47, 15, 23, 9, 22, 15]
[14, 14]
[15, 23, 9, 22, 15]
[16, 1111, 526, 156, 1126, 1103, 185, 312, 11126, 1734, 1277, 206, 127, 31, 11, 5, 3, 2, 1, 1]
[17, 7, 4, 11, 5, 3, 2, 1, 1]
对于n=18,请参见A077960型.
(结束)
MAPLE公司
带有(数字理论):
f:=proc(n)局部t1,v,r,x,j;
如果(n=1),则返回1;结束条件:;
t1:=系数(n):v:=0;
对于op(2,t1)中的x,求r:=pi(x[1]):
对于从1到x[2]的j do
v:=v*10^长度(r)+r;
结束do;结束do;v;终末程序;
t:=程序(n)局部v,l,s;v:=n;s:={v};l:=[v];v:=f(v);
s中的not v表示s:=s并集{v};l:=[op(l),v];v:=f(v);结束do;
【op(l),v】;
终末程序;[seq(nops(t(n))-1,n=1..17)];
数学
f[n_]:=如果[n==1,1,FromDigits@Flatten[IntegerDigits@#&/@(PrimePi@#
&/@Flatten[表格[First@#,{Last@#}]&/@因子整数@n])]];
g[n_]:=长度@NestWhileList[f,n,UnsameQ,All]-1;数组[g,39]
(*罗伯特·威尔逊v2009年2月2日;稍作修改法里德·菲鲁兹巴赫特2009年2月10日*)
黄体脂酮素
(GB数字)
空隙ea(n)
{
mpz u[];//因素
mpz tr[];//序列
打印(n);
而(n>1)
{
l系数(u,n);//将因子分解为u
vmap(u,pi);//按等级替换因子
n=有线电视(u);//连接
打印(n);
如果(vsearch(tr,n)>0)中断;//找到循环
vpush(tr,n);//记住n
}
println('');
}
(哈斯克尔)
导入数据。列表(genericIndex)
a098282 n=f[n],其中
f xs=if y`elem`xs然后是长度xs else f(y:xs),其中
y=通用索引(映射a087712[1..])(头部xs-1)
--莱因哈德·祖姆凯勒2013年7月14日
交叉参考
请参见A156055号用于其他版本。
关键字
非n,基础,美好的
作者
扩展
a(8)和a(10)由雅克·特拉姆
通过(39)扩展罗伯特·威尔逊v2009年2月2日
a(39)中的术语由更正法里德·菲鲁兹巴赫特2009年2月10日
a(40)-a(51)来自多诺万·约翰逊2011年1月8日
来自和a(40)的更多术语由更正马修·豪斯2016年12月23日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年4月24日18:17。包含371962个序列。(在oeis4上运行。)