%I#50 2020年7月9日05:43:50

%S 5,7,11,13,17,19,22,23,26,29,31,34,37,38,39,41,43,46,47,51,53,57,58，

%电话：59、61、62、67、68、69、71、73、74、76、79、82、83、86、87、89、92、93、94、97101103，

%电话：106107109111113115116118122123124127129131134137139141

%N Lopsided（或有偏）数：N的最大素因子大于2*sqrt（N）的数。

%注意所有大于3的素数都在这里。复合不平衡数见A101549。

%C First与A320048在a（51）处有所不同（继R.J.Mathar_之后），-Omar E.Pol_，2018年10月4日

%C该序列的渐近密度为log（2）（Chowla和Todd，1949）_Amiram Eldar，2020年7月9日

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

%H S.D.Chowla和John Todd，<a href=“https://doi.org/10.4153/CJM-1949-025-4“>可约化整数的密度，加拿大数学杂志，第1卷，第3期（1949年），第297-299页。

%H G.Everest、S.Stevens、D.Tamsett和T.Ward，<a href=“https://arxiv.org/abs/math/0412079“>二次多项式序列的本原除数</a>，arXiv:math/0412079[math.NT]，2004-2006。

%H G.Everest等人，<a href=“http://www.jstor.org/stable/27642221“>递归序列生成的素数，美国数学月刊，114（2007年第5期），417-431。

%p with（numtheory）：a:=proc（n）if max（（seq（factorset（n）[j]，j=1..nops（factorset（n））））^2>4*n然后n其他fi结束：seq（a（n），n=2..170）；#_Emeric Deutsch_，2007年5月27日

%t选择[Range[2，200]，FactorInteger[#][[-1，1]]>2Sqrt[#]&]

%Y参考A002162，A063763（复合n，使得最大素数因子>sqrt（n）），A064052（n，使最大素数因数>sqrtn））。

%K nonn公司

%O 1，1

%A _T.D.Noe_，2004年12月6日

%E根据R.J.Mathar的建议，由N.J.A.Sloane编辑，2008年7月2日_