%I#77 2022年10月23日16:11:45

%S 1,1,2,1,2,1,1,2,3,2,1,3,1,2,3,4,1,3,1,4,3,2,4,1,5,2,3,1,3,2，

%温度：5,6,1,2,3,5,1,6,14,5,2,1,6,7,5,3,4,1,6,5,7,3,2,1,6,12,7,8,5,6,4,4，

%U 3,7,1,8,1,2,5,4,7,6,1,8,9,2,1,7,5,2,3

%N N≤sqrt（N）的最大除数。

%C a（n）=sqrt（n）是新记录当且仅当n是平方_扎克·塞多夫，2009年7月17日

%当a（n）=A033677（n）=sqrt（n）严格大于A060775（n）时，C a（n。当n有大量除数时，最好有一个有效的算法来计算这些项，例如A060776、A060777和相关问题，例如A182987_M.F.Hasler，2011年9月20日

%当n＝1或n为素数时，C a（n）＝1。-_阿隆索·德尔·阿特（Alonso del Arte），2012年11月25日

%C a（n）是A207375第1列n的最小中心除数_Omar E.Pol_，2019年2月26日

%C a（n^4+n^2+1）=n^2-n+1：假设n^2-n+k除以n^4+n^2+1=（n^2-n+k）*（n^2+n-k+2）-（k-1）*不可能。因此，n^4+n^2+1比n^2-n+1的下一个最小除数至少是n^2-n+（2*n+1）=n^2+n+1>sqrt（n^4+n^2+1）_2022年10月23日，宋建宁

%D G.Tenenbaum，第268页及其后，载：R.L.Graham等人，编辑，Paul Erdõs I的数学。

%H T.D.Noe，n的表格，n的a（n）=1..10000</a>

%F a（n）=n/A033677（n）。

%F a（n）=A161906（n，A038548（n））_Reinhard Zumkeller_，2013年3月8日

%F a（n）=A162348（2n-1）_Daniel Forgues_，2014年9月29日

%p A033676:=程序（n）局部a，d；a:=0；对于numtheory[除数]（n）中的d，如果d^2<=n，则a:=max（a，d）；结束条件：；结束do:a；结束程序：#R.J.Mathar，2009年8月9日

%t largestDivisorLEQR[n_Integer]：=模块[{dvs=Divisors[n]}，dvs[[Ciling[长度@dvs/2]]]]; largestDivisorLEQR/@Range[100]（*Borislav Stanimirov，2010年3月28日*）

%t表[Last[Select[Divisors[n]，#<=Sqrt[n]&]]，{n，100}]（*_哈维·P·戴尔，2017年3月17日*）

%o（PARI）A033676（n）=｛局部（d）；如果（n<2.1，d=除数（n）；d[（长度（d）+1）\2]）｝\\_Michael B.Porter_，2010年1月30日

%o（哈斯克尔）

%o a033676 n=最后$takeWhile（<=a000196 n）$a027750_row n

%o——Reinhard Zumkeller，2012年6月4日

%o（Python）

%o来自sympy导入除数

%o定义A033676（n）：

%o d=除数（n）

%o返回d[（len（d）-1）//2]#_恰瓦乌，2021年4月5日

%Y参见A033677（n/a（n）），A000196（sqrt），A027750（除数列表），A056737（n/an）-a（n），A219695（奇数的一半），A207375（列出中心除数）。

%Y严格来说，次要案例是A060775。另请参阅A140271。

%Y给定值的指数：A008578（1和素数：a（n）=1），A161344（a（n）=2），A16.1345（a（n）=3），A1161424（4），A1610835（5），A162526（6），A1162527。

%不，简单，好

%O 1,4型

%A _N.J.A.斯隆_