Superspreading and negative-binomial offspring
DefinitionNegative-binomial offspring probabilities#✓fully proved
The negative-binomial offspring probability with mean R and dispersion k:
P(Z = n) = C(k + n - 1, n) p^k (1 - p)^n with p = k / (k + R) (Lloyd-Smith et al. 2005).
Meaningful for k > 0, R ≥ 0.
noncomputable def nbPmf (R k : ℝ) (n : ℕ) : ℝ :=
Ring.choose (k + n - 1) n * (k / (k + R)) ^ k * (R / (k + R)) ^ n
DefinitionNegative-binomial probability generating function#✓fully proved
The negative-binomial generating function G_k(s) = (1 + (R / k) (1 - s))^{-k}.
noncomputable def nbPgf (R k s : ℝ) : ℝ :=
(1 + R / k * (1 - s)) ^ (-k)
Used by 8
DefinitionNegative-binomial offspring distribution#✓fully proved
The negative-binomial offspring law as a measure on ℕ.
noncomputable def nbOffspring (R k : ℝ) : Measure ℕ :=
Measure.sum fun n => ENNReal.ofReal (nbPmf R k n) • Measure.dirac n
noncomputable def nbPmf (R k : ℝ) (n : ℕ) : ℝ :=
Ring.choose (k + n - 1) n * (k / (k + R)) ^ k * (R / (k + R)) ^ n
MathlibExt/Biology/Epidemiology/Superspreading.lean:77
Uses 1 · Used by 4
TheoremNonnegativity of the negative-binomial probabilities#✓fully proved
The negative-binomial probabilities are nonnegative for k > 0, R ≥ 0.
theorem nbPmf_nonneg {R k : ℝ} (hk : 0 < k) (hR : 0 ≤ R) (n : ℕ) : 0 ≤ nbPmf R k n
noncomputable def nbPmf (R k : ℝ) (n : ℕ) : ℝ :=
Ring.choose (k + n - 1) n * (k / (k + R)) ^ k * (R / (k + R)) ^ n
MathlibExt/Biology/Epidemiology/Superspreading.lean:77
Uses 1 · Used by 2
TheoremGenerating-function identity#✓fully proved
For k > 0, R ≥ 0 and s ∈ [0, 1],
∑ₙ P(Z = n) sⁿ = (1 + (R / k) (1 - s))^{-k}.
theorem hasSum_nbPmf_mul_pow {R k : ℝ} (hk : 0 < k) (hR : 0 ≤ R) {s : ℝ}
(hs : s ∈ Icc (0 : ℝ) 1) : HasSum (fun n => nbPmf R k n * s ^ n) (nbPgf R k s)
noncomputable def nbPmf (R k : ℝ) (n : ℕ) : ℝ :=
Ring.choose (k + n - 1) n * (k / (k + R)) ^ k * (R / (k + R)) ^ n
MathlibExt/Biology/Epidemiology/Superspreading.lean:77
noncomputable def nbPgf (R k s : ℝ) : ℝ :=
(1 + R / k * (1 - s)) ^ (-k)
MathlibExt/Biology/Epidemiology/Superspreading.lean:81
TheoremNegative-binomial offspring law is a probability measure#✓fully proved
The negative-binomial offspring law is a probability measure (k > 0, R ≥ 0).
theorem isProbabilityMeasure_nbOffspring {R k : ℝ} (hk : 0 < k) (hR : 0 ≤ R) :
IsProbabilityMeasure (nbOffspring R k)
noncomputable def nbOffspring (R k : ℝ) : Measure ℕ :=
Measure.sum fun n => ENNReal.ofReal (nbPmf R k n) • Measure.dirac n
MathlibExt/Biology/Epidemiology/Superspreading.lean:85
Uses 5 · Used by 3
TheoremGenerating function of the negative-binomial law in closed form#✓fully proved
The generating function of the negative-binomial offspring law is nbPgf on [0, 1].
theorem pgf_nbOffspring {R k : ℝ} (hk : 0 < k) (hR : 0 ≤ R) {s : ℝ}
(hs : s ∈ Icc (0 : ℝ) 1) : pgf id (nbOffspring R k) s = nbPgf R k s
noncomputable def pgf (X : Ω → ℕ) (μ : Measure Ω) (s : ℝ) : ℝ :=
∫ ω, s ^ X ω ∂μ
MathlibExt/Probability/ProbabilityGeneratingFunction.lean:47
noncomputable def nbOffspring (R k : ℝ) : Measure ℕ :=
Measure.sum fun n => ENNReal.ofReal (nbPmf R k n) • Measure.dirac n
MathlibExt/Biology/Epidemiology/Superspreading.lean:85
noncomputable def nbPgf (R k s : ℝ) : ℝ :=
(1 + R / k * (1 - s)) ^ (-k)
MathlibExt/Biology/Epidemiology/Superspreading.lean:81
Uses 7 · Used by 2
TheoremMonotonicity in the dispersion#✓fully proved
For R ≥ 0, s ∈ [0, 1] and 0 < k₁ ≤ k₂,
G_{k₂}(s) ≤ G_{k₁}(s); equivalently k ↦ k log (1 + x / k) is nondecreasing for x ≥ 0.
theorem nbPgf_antitone {R : ℝ} (hR : 0 ≤ R) {s : ℝ} (hs : s ∈ Icc (0 : ℝ) 1) {k₁ k₂ : ℝ}
(hk₁ : 0 < k₁) (hk : k₁ ≤ k₂) : nbPgf R k₂ s ≤ nbPgf R k₁ s
noncomputable def nbPgf (R k s : ℝ) : ℝ :=
(1 + R / k * (1 - s)) ^ (-k)
MathlibExt/Biology/Epidemiology/Superspreading.lean:81
Uses 1 · Used by 1
TheoremNegative-binomial law with dispersion one is geometric#✓fully proved
k = 1 is the geometric offspring law: G_1(s) = 1 / (1 + R (1 - s)).
theorem nbPgf_one_dispersion (R s : ℝ) : nbPgf R 1 s = 1 / (1 + R * (1 - s))
noncomputable def nbPgf (R k s : ℝ) : ℝ :=
(1 + R / k * (1 - s)) ^ (-k)
MathlibExt/Biology/Epidemiology/Superspreading.lean:81
Uses 1
TheoremPoisson limit#✓fully proved
As k → ∞, G_k(s) → e^{-R (1 - s)} (for all real R, s).
theorem tendsto_nbPgf_atTop (R s : ℝ) :
Tendsto (fun k => nbPgf R k s) atTop (𝓝 (Real.exp (-(R * (1 - s)))))
noncomputable def nbPgf (R k s : ℝ) : ℝ :=
(1 + R / k * (1 - s)) ^ (-k)
MathlibExt/Biology/Epidemiology/Superspreading.lean:81
Uses 1
TheoremComparison principle for Galton–Watson extinction#✓fully proved
If the offspring generating
functions satisfy f₂ ≤ f₁ on [0, 1], then the extinction probabilities satisfy
q₂ ≤ q₁.
theorem extinctionProb_le_of_pgf_le (ν₁ ν₂ : Measure ℕ) [IsProbabilityMeasure ν₁]
[IsProbabilityMeasure ν₂] (h : ∀ s ∈ Icc (0 : ℝ) 1, pgf id ν₂ s ≤ pgf id ν₁ s) :
extinctionProb ν₂ ≤ extinctionProb ν₁
noncomputable def pgf (X : Ω → ℕ) (μ : Measure Ω) (s : ℝ) : ℝ :=
∫ ω, s ^ X ω ∂μ
MathlibExt/Probability/ProbabilityGeneratingFunction.lean:47
noncomputable def extinctionProb : ℝ :=
⨆ n, (law ν n).real {0}
MathlibExt/Probability/BranchingProcess/GaltonWatson.lean:77
TheoremNegative-binomial extinction probability is the least fixed point#✓fully proved
The extinction probability of the negative-binomial epidemic is the least fixed point of
G_k in [0, 1].
theorem isLeast_extinctionProb_nbOffspring {R k : ℝ} (hk : 0 < k) (hR : 0 ≤ R) :
have := isProbabilityMeasure_nbOffspring hk hR
IsLeast {s | s ∈ Icc (0 : ℝ) 1 ∧ nbPgf R k s = s} (extinctionProb (nbOffspring R k))
theorem isProbabilityMeasure_nbOffspring {R k : ℝ} (hk : 0 < k) (hR : 0 ≤ R) :
IsProbabilityMeasure (nbOffspring R k)
MathlibExt/Biology/Epidemiology/Superspreading.lean:137
noncomputable def nbPgf (R k s : ℝ) : ℝ :=
(1 + R / k * (1 - s)) ^ (-k)
MathlibExt/Biology/Epidemiology/Superspreading.lean:81
noncomputable def extinctionProb : ℝ :=
⨆ n, (law ν n).real {0}
MathlibExt/Probability/BranchingProcess/GaltonWatson.lean:77
noncomputable def nbOffspring (R k : ℝ) : Measure ℕ :=
Measure.sum fun n => ENNReal.ofReal (nbPmf R k n) • Measure.dirac n
MathlibExt/Biology/Epidemiology/Superspreading.lean:85
TheoremSuperspreading raises the extinction probability#✓fully proved
Superspreading raises the extinction probability (Lloyd-Smith et al. 2005): at a
fixed mean R ≥ 0, the probability q_k that the outbreak started by one case goes extinct
is nonincreasing in the dispersion k > 0.
theorem extinctionProb_nbOffspring_antitone {R : ℝ} (hR : 0 ≤ R) {k₁ k₂ : ℝ} (hk₁ : 0 < k₁)
(hk : k₁ ≤ k₂) :
have := isProbabilityMeasure_nbOffspring hk₁ hR
have := isProbabilityMeasure_nbOffspring (hk₁.trans_le hk) hR
extinctionProb (nbOffspring R k₂) ≤ extinctionProb (nbOffspring R k₁)
theorem isProbabilityMeasure_nbOffspring {R k : ℝ} (hk : 0 < k) (hR : 0 ≤ R) :
IsProbabilityMeasure (nbOffspring R k)
MathlibExt/Biology/Epidemiology/Superspreading.lean:137
noncomputable def extinctionProb : ℝ :=
⨆ n, (law ν n).real {0}
MathlibExt/Probability/BranchingProcess/GaltonWatson.lean:77
noncomputable def nbOffspring (R k : ℝ) : Measure ℕ :=
Measure.sum fun n => ENNReal.ofReal (nbPmf R k n) • Measure.dirac n
MathlibExt/Biology/Epidemiology/Superspreading.lean:85
Loading dependency explorer…
The dependency explorer needs JavaScript and its graph data.