Uniform Positive Halfspace Mass For A Probability Measure
ProvedFunctionalInequalities.Probability.exists_pos_le_measure_halfspace_of_mem_interior_convexHull_support_readableThis formalizes the probability-measure halfspace estimate associated with Lemma 16 of Cordero–Erausquin–Klartag, Moment measures (arXiv:1304.0630v1), cited there as an alternative formulation.
Let be a finite-dimensional real inner-product normed additive group with a measurable Borel structure. Let be a probability measure and let lie in the interior of the convex hull of . Then there exists such that
and, for every unit vector ,
This gives a dimension-dependent uniform lower bound for all strict open halfspaces through .
Original Lean declaration header
Within namespace FunctionalInequalities.Probability. Shown in its original module context. Proof omitted.
theorem exists_pos_le_measure_halfspace_of_mem_interior_convexHull_support [FiniteDimensional ℝ E] [MeasurableSpace E] [BorelSpace E]
(μ : ProbabilityMeasure E) {x₀ : E} (hx₀ : x₀ ∈ interior (convexHull ℝ (μ : Measure E).support)) :
∃ m : ℝ, 0 < m ∧ m ≤ 1 ∧
∀ u : E, ‖u‖ = 1 → m ≤ ((μ : Measure E) {x | 0 < ⟪u, x - x₀⟫}).toReal
Module navigation
Module: Probability/ConvexSupport.
Supporting theorems: exists_mem_support_inner_sub_pos_of_mem_interior_convexHull, exists_pos_ball_inner_sub_pos_of_mem_support.
Previous: exists_pos_ball_inner_sub_pos_of_mem_support · Next: mem_interior_setOf_ne_top_of_lintegral_ne_top.
Source excerpt, lines 305–308 · Frozen source 408915f.
import Definitions.Def_KLSModular_FunctionalInequalities_Probability_ConvexSupport
open MeasureTheory
open scoped RealInnerProductSpace
variable {E : Type*}
variable [NormedAddCommGroup E] [InnerProductSpace ℝ E]
theorem FunctionalInequalities.Probability.exists_pos_le_measure_halfspace_of_mem_interior_convexHull_support_readable [FiniteDimensional ℝ E] [MeasurableSpace E] [BorelSpace E]
(μ : ProbabilityMeasure E) {x₀ : E} (hx₀ : x₀ ∈ interior (convexHull ℝ (μ : Measure E).support)) :
∃ m : ℝ, 0 < m ∧ m ≤ 1 ∧
∀ u : E, ‖u‖ = 1 → m ≤ ((μ : Measure E) {x | 0 < ⟪u, x - x₀⟫}).toReal := by sorry