A164000-OEIS公司

164000加元

阵列主对角线A163280号.

1, 6, 15, 28, 45, 66, 91, 128, 162, 200, 231, 372, 325, 406, 495, 656, 561, 954, 703, 1180, 987, 1078, 1035, 1896, 1375, 1534, 1701, 2324, 1653, 3090, 1891, 3104, 2541, 2686, 3045, 5004, 2701, 3382, 3627, 5560, 3321, 6846, 3655, 6028, 6165, 5014, 4371 (列表;图表;参考;听;历史;文本;内部格式)

	抵消	`1,2`
	链接	`n=1..47时的n，a（n）表。`
	MAPLE公司	A033676号：=proc（n）局部a，d；a:=0；对于numtheory[除数]（n）中的d，如果d^2<=n，则a:=max（a，d）；结束条件：；结束do:a；结束进程：A163280号：=proc（n，k）局部r，T；r:=0；对于从k^2到kdo的T，如果A033676号（T） =k，则r：=r+1；如果r=n，则返回（T）；结束条件：；结束条件：；end do：结束进程：164000加元：=进程（n）A163280号（n，n）；结束进程：seq(164000加元（n），n=1..60）#R.J.马塔尔2010年2月16日
	数学	`nmax=50；` `pm=素数[nmax]；` `selDiv[n_]：=选择[Divisors[n]，#^2<=n&][[-1]]；` `清除[col]；` `col[k]：=col[k]=选择[范围[k pm]，selDiv[#]==k&]；` `a[n]：=列[n][[n]]；` `数组[a，nmax](Jean-François Alcover公司2020年3月24日）`
	黄体脂酮素	`（PARI）列表a（nn）=我的（v=应用（f，[1..（2*nn-1）^2]），列=向量（nn，i，选择（x->（x==i），v，1））；向量（nn，i，列[i][i]）\\米歇尔·马库斯2023年1月23日`
	交叉参考	`囊性纤维变性。A008578号,A161344号,A161345号,A163280号.` `上下文中的顺序：A373172 A096892号 A000384号A212087型 A301292型 A359696飞机` `相邻序列：A163997号 A163998号 A163999号A164001号 A164002号 A164003号`
	关键字	`非n`
	作者	`奥马尔·波尔2009年8月8日`
	扩展	`a（13）中的条款由R.J.马塔尔2010年2月16日`
	状态	`经核准的`