Skip to content
Merged
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
35 changes: 26 additions & 9 deletions FormalConjectures/ErdosProblems/387.lean
Original file line number Diff line number Diff line change
Expand Up @@ -21,20 +21,32 @@ import FormalConjectures.Util.ProblemImports

*References:*
- [erdosproblems.com/387](https://www.erdosproblems.com/387)
- [ErGr76b] Erdős, P. and Graham, R. L., *On the prime factors of
${n \choose k}$*. Fibonacci Quart. (1976), 348-352.
- [Er78g] Erdős, Pál, *On prime factors of binomial coefficients. II*. Mat. Lapok
(1978/82), 307-316.
- [ErGr80] Erdős, P. and Graham, R., *Old and new problems and results in combinatorial
number theory*. Monographies de L'Enseignement Mathematique (1980).
- [Sc58] Schinzel, A., *Sur un problème de P. Erdős*. Colloq. Math. (1958), 198-204.
- [Gu04] Guy, Richard K., Unsolved problems in number theory. (2004), xviii+437.
- [Fa66] Faulkner, M. "On a theorem of Sylvester and Schur." Journal of the London Mathematical
Society 1.1 (1966): 107-110.
-
- [BNPZ26] Bui, H., Naprienko, S., Pratt, K., and Zaharescu, A. Binomial coefficients with
divisors avoiding an interval. arXiv:2605.21221 (2026).
-/

open Filter

namespace Erdos387

/-- Is there an absolute constant `c > 0` such that, for all `1 ≤ k < n`, the binomial coefficient
`n.choose k` has a divisor in `(cn, n]`? -/
@[category research open, AMS 11]
theorem erdos_387 : answer(sorry) ↔ ∃ c : ℝ, 0 < c ∧ ∀ n k : ℕ, 1 ≤ k → k < n →
/--
Is there an absolute constant $c > 0$ such that, for all $1 \leq k < n$, the binomial coefficient
$\binom{n}{k}$ has a divisor in $(cn, n]$?

Bui, Naprienko, Pratt, and Zaharescu [BNPZ26] answered this negatively.
-/
@[category research solved, AMS 11]
theorem erdos_387 : answer(False) ↔ ∃ c : ℝ, 0 < c ∧ ∀ n k : ℕ, 1 ≤ k → k < n →
∃ d : ℕ, (d : ℝ) ∈ Set.Ioc (c * n) n ∧ d ∣ n.choose k := by
sorry

Expand Down Expand Up @@ -62,10 +74,15 @@ theorem erdos_387.variants.easy {n : ℕ} {k : ℕ} (hn : 1 ≤ n) (hk : k ≤ n
· cases n <;> cases k <;> simp_all [Nat.add_one_mul_choose_eq]
· exact Nat.le_of_dvd (by linarith) (gcd_dvd_right _ _)

/-- Is it true for any `c < 1` and all `n` sufficiently large, for all `1 ≤ k < n`, `n.choose k`
has a divisor in `(cn, n]`? This is a variant of `erdos_387` and appears in [Gu04]. -/
@[category research open, AMS 11]
theorem erdos_387.variants.guy : answer(sorry) ↔ ∀ c : ℝ, c < 1 → ∀ᶠ n : ℕ in atTop, ∀ k : ℕ, 1 ≤ k →
/--
Is it true for any $c < 1$ and all $n$ sufficiently large, for all $1 \leq k < n$,
$\binom{n}{k}$ has a divisor in $(cn, n]$?

This variant appears in [Gu04]. Bui, Naprienko, Pratt, and Zaharescu [BNPZ26] answered it
negatively.
-/
@[category research solved, AMS 11]
theorem erdos_387.variants.guy : answer(False) ↔ ∀ c : ℝ, c < 1 → ∀ᶠ n : ℕ in atTop, ∀ k : ℕ, 1 ≤ k →
k < n → ∃ d : ℕ, (d : ℝ) ∈ Set.Ioc (c * n) n ∧ d ∣ n.choose k := by
sorry

Expand Down
Loading