theorem vri_from_moment_recursion [NeZero J]
(x : Fin J → ℝ) (hx : ∀ j, 0 < x j) (ρ : ℝ) :
HasDerivAt (fun p => escortRawMoment x p 1)
(escortCumulant2 x ρ) ρ := by
unfold escortCumulant2
have h := escortRawMoment_hasDerivAt x hx ρ 1
refine h.congr_deriv ?_
ringThe Cumulant Tower: Higher-Order Bridges Between CES and Escort Statistics