theorem
Verification.claytonNegative_cdfSection_deriv
{θ : ℝ}
(hmin : -1 < θ)
(hmax : θ < 0)
(v : ↑unitInterval)
(hv : 0 < ↑v)
(u : ℝ)
(hu : u ∈ Set.Ioo 0 1)
:
HasDerivAt ((ProbabilityTheory.Copula.claytonNegative θ ⋯ hmax).cdfSection v) (claytonNegativePartial θ u ↑v) u
theorem
Verification.claytonNegative_conditionalCDF
{θ : ℝ}
(hmin : -1 < θ)
(hmax : θ < 0)
(v : ↑unitInterval)
(hv : 0 < ↑v)
:
(fun (u : ↑unitInterval) =>
(ProbabilityTheory.Copula.claytonNegative θ ⋯ hmax).conditionalCDF u v) =ᵐ[MeasureTheory.volume]
fun (u : ↑unitInterval) => claytonNegativePartial θ ↑u ↑v
theorem
Verification.claytonNegative_product_primitive
{θ : ℝ}
(hmin : -1 < θ)
(hmax : θ < 0)
(v : ↑unitInterval)
(hv : 0 < ↑v)
(u : ℝ)
(hu : u ∈ Set.Ioo 0 1)
:
HasDerivAt
(fun (x : ℝ) =>
↑v ^ (-θ - 1) / (θ + 2) * (ProbabilityTheory.Copula.claytonNegative θ ⋯ hmax).cdfSection v x ^ (θ + 2))
(claytonNegativePartial θ u ↑v * claytonNegativePartial θ (↑v) u) u
theorem
Verification.integral_claytonNegativePartial_product
{θ : ℝ}
(hmin : -1 < θ)
(hmax : θ < 0)
(v : ↑unitInterval)
(hv : 0 < ↑v)
:
∫ (u : ↑unitInterval), claytonNegativePartial θ ↑u ↑v * claytonNegativePartial θ ↑v ↑u = ↑v / (θ + 2)