A005424-OEIS公司

A005424号

需要n次双目标函数迭代的最小数字(A116550型)达到1。
（原名M0530）

2, 3, 4, 5, 8, 9, 13, 16, 17, 24, 25, 35, 44, 63, 64, 91, 97, 128, 193, 221, 259, 324, 353, 391, 477, 702, 929, 1188, 1269, 1589, 1613, 2017, 2309, 2623, 3397, 4064, 4781, 5468, 6515, 6887, 9213, 12286, 12887, 14009, 16564, 16897, 17803, 30428, 36256 (列表;图表;参考;听;历史;文本;内部格式)

	抵消	`1,1`
	评论	`设p（n）=n的酉因子k的个数，k<n，它们相对n是素数。序列给出最小r，使得p_r（n）=1。`
	参考文献	`M.Lal、H.Wareham和R.Mifflin，双元函数的迭代，实用数学。，10 (1976), 347-350.` `N.J.A.Sloane和Simon Plouffe，《整数序列百科全书》，学术出版社，1995年（包括该序列）。`
	链接	`阿米拉姆·埃尔达尔，n=1..97时的n，a（n）表（多诺万·约翰逊第1..78条）`
	MAPLE公司	`L:=[序列（0，i=0..100）]；` `从1到n do` `国际税务局：=A225320型（n）；` `如果itr<nops（L），则` `如果op（itr，L）=0，则` `L:=底土（itr=n，L）；` `打印（L）；` `结束条件：；` `结束条件：；` `结束do:#R.J.马塔尔，2013年5月2日`
	数学	A116550型[1] =1；116550英镑[n_]：=带[｛pp=功率@@@FactorInteger[n]}，计数[范围[n]，m_/；交集[pp，幂@@@FactorInteger[m]]==｛｝]]；A225320型[编号]：=A225320型[n] =如果[n==1，0，1+A225320型[A116550型[n] ]]；L=数组[0&，100]；对于[n=1，n<=40000，n++，itr=A225320型[n] ；如果[itr<Length[L]，如果[L[[itr]]==0，L=ReplacePart[L，itr->n]；打印[Select[L，Positive]//Last]]]；选择[L，正](Jean-François Alcover公司2014年1月13日之后R.J.马塔尔)
	交叉参考	`囊性纤维变性。A116550型,A225175型,225176英镑.` `上下文中的序列：A165652号 A191851号 A063678号A105317号 A342094型 A094103号` `相邻序列：A005421号 A005422号 A005423号A005425号 A005426号 A005427号`
	关键词	`非n,美好的`
	作者	`N.J.A.斯隆`
	状态	`已批准`