There is a function FindDistribution
that finds a distribution from the given data.
But what if I'm given moments and what to find a distribution.
Is there any function for this?
Thank you.
j[x_] := Moment[JohnsonDistribution["SL", gamma, delta, 0, lambda],x];
FindRoot[{j[1] == 1.2974425414, j[2] == 5.252267250245984,
j[3] == 112.50634898225843576187}, {{delta,
1.5}, {gamma, -1.2}, {lambda, 0.4}}, WorkingPrecision -> 250,
MaxIterations -> 10000]
It gives Encountered a singular Jacobian at the point {delta,gamma,lambda} = \ {1.5
,-1.2,0.4
}. Try perturbing the initial point(s)`.
PDF
. Then useProbabilityDistribution
to define the distribution from thePDF
. $\endgroup$