A105017-OEIS公司

A105017标准

记录在中的位置A064097号.

1, 2, 3, 5, 7, 11, 19, 23, 43, 47, 94, 139, 235, 283, 517, 659, 1081, 1319, 2209, 2879, 5758, 8637, 13301, 20147, 30337, 49727, 61993, 103823, 135313, 247439, 366683, 606743, 811879, 1266767, 1739761, 2913671, 3797401, 5827343, 8288641, 16577282, 22784407, 37346483, 58003213, 81768767 (列表;图表;参考;听;历史;文本;内部格式)

	抵消	`1,2`
	评论	`当a（1）=1时，a（n）是最小的数字m，使得k->k-k/p的迭代次数等于n-1，p是k的任何素数因子，从k=m开始需要达到1。（参见示例部分。）-雅罗斯拉夫·克里泽克，2010年2月15日` `a（n）=~sqrt（e^（5n/6））-罗伯特·威尔逊v2022年8月11日`
	链接	`Robert G.Wilson v，n=1..200时的n，a（n）表` `雨果·普福尔特纳，程序`
	例子	`a（6）=11，因为m=11要求r->r-（最大除数d<r）的6-1=5次迭代达到1（5次迭代为11-1=10、10-5=5、5-1=4、4-2=2和2-1=1），11是最小的数字m-雅罗斯拉夫·克里泽克2010年2月15日`
	MAPLE公司	`2017年10月：=处理（）` `局部最大值a；` `最大值：=-999；` `从1到n do` `答：=A064097号（n）；` `如果a>maxa，则` `printf（“%d\n”，n）；` `最大值：=a；` `结束条件：；` `结束do：` `结束进程：` `A105017标准() ; #R.J.马塔尔2022年8月7日`
	数学	`g[n_]：=块[{p=选择[1+除数@n，素数Q]}，np/（p-1）]；f[n_]：=f[n]=块[{lst=扁平接头[g@#&/@f[n-1]]}，如果[Length@lst>325，lst=Take[lst，325（此限制必须从一开始就为n增加。）]]；lst]；f[1]={1}；f[0]={0}；lst={}；做[AppendTo[lst，Min[f[n]]]；f[n-1]=。，{n，44}]；第一次(罗伯特·威尔逊v2022年8月11日*）`
	黄体脂酮素	`（PARI）a=向量小（10^7）；a[1]=0；` `对于（n=2，#a，如果（i素数（n），a[n]=1+a[n-1]，f=因子（n）；a[n]=a[f[1,1]]+a[n/f[1,1]]）；\\计算A064097号` `r=-oo；对于（k=1，#a，如果（a[k]>r，打印1（k，“，”）；r=a[k]）\\雨果·普福尔特纳2020年3月16日`
	交叉参考	`囊性纤维变性。A000079,A064097号,A067513号,A175125型.` `上下文中的序列：A228062号 A332216 A059878号A214197型 A083771号 A158069号` `相邻序列：A105014标准 A105015标准 A105016标准A105018标准 A105019标准 A105020标准`
	关键词	`非n`
	作者	`雨果·普福尔特纳2006年2月17日`
	扩展	`a（1）=1由插入罗伯特·威尔逊v2020年3月16日`
	状态	`已批准`