Theorem 5.1: monotonicity of in the session length
ProvedEngagementOpt.Survey.theorem_5_1A user's session has two phases. System 2 enjoys items, after which system 1 keeps the user on for further steps (counting the first), with independent on ; the session length is . Each enjoyed item has mean value and each step costs the outside option , so that (8)–(9)
Assume , , and . "Increasing" means and "decreasing" means . Then:
- . for all if and only if .
- . (a) If , then for all . (b) If , there is such that for all .
- . (a) If , then for all . (b) There is such that for all .
A platform that observes post-session survey utility and session lengths can therefore read off whether its content has longer span than moreishness () or the reverse.
Formalization Note The hypotheses , are the paper's standing assumptions (§2.1: "for some ", "probability "; the parameter space has ). The parameter space on p. 15 has ; is implicit (§2.1 normalizes ). The hypothesis in 2(b) is not printed in the theorem but is used in its proof on p. 22 ("since by assumption"); without it 2(b) is false, since the per-step growth of stays below . Session lengths are natural numbers , the support of .
import Mathlib import Definitions.Def_EngagementOpt_Survey_condUtility
namespace EngagementOpt.Survey
/-- arXiv:2202.11776v3, p. 19, Theorem 5.1. Let `f(t) = E[S | T = t]` (`condUtility`) for session
lengths `t ≥ 1`, with `0 < p < 1`, `0 < q < 1`, `v̄ ≥ 0` and `W > 0`.
1. If `q = p`, then `f` is (strictly) increasing on `t ≥ 1` iff `v̄ > 2W`.
2. If `q > p`: (a) if `v̄ > 2W`, `f` is increasing for all `t ≥ 1`;
(b) if `v̄ > W` (the hypothesis used in the proof, p. 22), `f` is increasing for `t > t*`.
3. If `q < p`: (a) if `v̄ < 2W`, `f` is decreasing for all `t ≥ 1`;
(b) `f` is decreasing for `t > t*`. -/
theorem theorem_5_1 (p q v W : ℝ) (hp0 : 0 < p) (hp1 : p < 1) (hq0 : 0 < q) (hq1 : q < 1)
(hv : 0 ≤ v) (hW : 0 < W) :
(q = p →
((∀ t : ℕ, 1 ≤ t → condUtility v W p q t < condUtility v W p q (t + 1)) ↔ 2 * W < v)) ∧
(p < q → 2 * W < v →
∀ t : ℕ, 1 ≤ t → condUtility v W p q t < condUtility v W p q (t + 1)) ∧
(p < q → W < v →
∃ t₀ : ℕ, ∀ t : ℕ, t₀ < t → condUtility v W p q t < condUtility v W p q (t + 1)) ∧
(q < p → v < 2 * W →
∀ t : ℕ, 1 ≤ t → condUtility v W p q (t + 1) < condUtility v W p q t) ∧
(q < p →
∃ t₀ : ℕ, ∀ t : ℕ, t₀ < t → condUtility v W p q (t + 1) < condUtility v W p q t) := by sorry
end EngagementOpt.Survey
Confirmed by the mission captain (proposal self-audit).
Confirmed by the moderator at approval.