Erdős problem 448
Let count the divisors of and count the number of such that has a divisor in . Is it true that, for all , for almost all ?
Sources
FormalConjectures/ErdosProblems/
448.lean
Retained formal statement
Quantitative form of the (negative) answer to erdos_448. Erdős and Tenenbaum [ErTe81] showed that the upper density of is in fact , where the in the exponent tends to as . Equivalently, as .
Filter.Tendsto (fun ε => Real.log {n | ↑(Erdos448.tauPlus n) < ε * ↑n.divisors.card}.upperDensity / Real.log ε) (nhdsWithin 0 (Set.Ioi 0)) (nhds 1)SolvedStatement only, no proof