mirror of
				https://github.com/saitohirga/WSJT-X.git
				synced 2025-10-31 13:10:19 -04:00 
			
		
		
		
	
		
			
				
	
	
		
			176 lines
		
	
	
		
			7.9 KiB
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
			
		
		
	
	
			176 lines
		
	
	
		
			7.9 KiB
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
| [section:inverse_chi_squared_dist Inverse Chi Squared Distribution]
 | |
| 
 | |
| ``#include <boost/math/distributions/inverse_chi_squared.hpp>``
 | |
| 
 | |
|    namespace boost{ namespace math{ 
 | |
|       
 | |
|    template <class RealType = double, 
 | |
|              class ``__Policy``   = ``__policy_class`` >
 | |
|    class inverse_chi_squared_distribution
 | |
|    {
 | |
|    public:
 | |
|       typedef RealType value_type;
 | |
|       typedef Policy   policy_type;
 | |
| 
 | |
|       inverse_chi_squared_distribution(RealType df = 1); // Not explicitly scaled, default 1/df.
 | |
|       inverse_chi_squared_distribution(RealType df, RealType scale = 1/df);  // Scaled.
 | |
| 
 | |
|       RealType degrees_of_freedom()const; // Default 1.
 | |
|       RealType scale()const; // Optional scale [xi] (variance), default 1/degrees_of_freedom.
 | |
|    };
 | |
|    
 | |
|    }} // namespace boost // namespace math
 | |
|    
 | |
| The inverse chi squared distribution is a continuous probability distribution
 | |
| of the *reciprocal* of a variable distributed according to the chi squared distribution.
 | |
| 
 | |
| The sources below give confusingly different formulae
 | |
| using different symbols for the distribution pdf,
 | |
| but they are all the same, or related by a change of variable, or choice of scale.
 | |
| 
 | |
| Two constructors are available to implement both the scaled and (implicitly) unscaled versions.
 | |
| 
 | |
| The main version has an explicit scale parameter which implements the
 | |
| [@http://en.wikipedia.org/wiki/Scaled-inverse-chi-square_distribution scaled inverse chi_squared distribution].
 | |
| 
 | |
| A second version has an implicit scale = 1/degrees of freedom and gives the 1st definition in the
 | |
| [@http://en.wikipedia.org/wiki/Inverse-chi-square_distribution Wikipedia inverse chi_squared distribution].
 | |
| The 2nd Wikipedia inverse chi_squared distribution definition can be implemented
 | |
| by  explicitly specifying a scale = 1.
 | |
| 
 | |
| Both definitions are also available in Wolfram Mathematica and in __R (geoR) with default scale = 1/degrees of freedom.
 | |
| 
 | |
| See 
 | |
| 
 | |
| * Inverse chi_squared distribution [@http://en.wikipedia.org/wiki/Inverse-chi-square_distribution]
 | |
| * Scaled inverse chi_squared distribution[@http://en.wikipedia.org/wiki/Scaled-inverse-chi-square_distribution] 
 | |
| * R inverse chi_squared distribution functions [@http://hosho.ees.hokudai.ac.jp/~kubo/Rdoc/library/geoR/html/InvChisquare.html R ]
 | |
| * Inverse chi_squared distribution functions [@http://mathworld.wolfram.com/InverseChi-SquaredDistribution.html Weisstein, Eric W. "Inverse Chi-Squared Distribution." From MathWorld--A Wolfram Web Resource.] 
 | |
| * Inverse chi_squared distribution reference [@http://reference.wolfram.com/mathematica/ref/InverseChiSquareDistribution.html Weisstein, Eric W. "Inverse Chi-Squared Distribution reference." From Wolfram Mathematica.]
 | |
| 
 | |
| The inverse_chi_squared distribution is used in
 | |
| [@http://en.wikipedia.org/wiki/Bayesian_statistics Bayesian statistics]:
 | |
| the scaled inverse chi-square is conjugate prior for the normal distribution
 | |
| with known mean, model parameter [sigma][pow2] (variance).
 | |
| 
 | |
| See [@http://en.wikipedia.org/wiki/Conjugate_prior conjugate priors including a table of distributions and their priors.]
 | |
| 
 | |
| See also __inverse_gamma_distrib and __chi_squared_distrib.
 | |
| 
 | |
| The inverse_chi_squared distribution is a special case of a inverse_gamma distribution
 | |
| with [nu] (degrees_of_freedom) shape ([alpha]) and scale ([beta]) where
 | |
| 
 | |
| __spaces [alpha]= [nu] /2 and [beta] = [frac12].
 | |
| 
 | |
| [note This distribution *does* provide the typedef:
 | |
| 
 | |
| ``typedef inverse_chi_squared_distribution<double> inverse_chi_squared;`` 
 | |
| 
 | |
| If you want a `double` precision inverse_chi_squared distribution you can use 
 | |
| 
 | |
| ``boost::math::inverse_chi_squared_distribution<>``
 | |
| 
 | |
| or you can write `inverse_chi_squared my_invchisqr(2, 3);`]
 | |
| 
 | |
| For degrees of freedom parameter [nu],
 | |
| the (*unscaled*) inverse chi_squared distribution is defined by the probability density function (PDF):
 | |
| 
 | |
| __spaces f(x;[nu]) = 2[super -[nu]/2] x[super -[nu]/2-1] e[super -1/2x] / [Gamma]([nu]/2)
 | |
| 
 | |
| and Cumulative Density Function (CDF)
 | |
| 
 | |
| __spaces  F(x;[nu]) = [Gamma]([nu]/2, 1/2x) / [Gamma]([nu]/2)
 | |
| 
 | |
| For degrees of freedom parameter [nu] and scale parameter [xi],
 | |
| the *scaled* inverse chi_squared distribution is defined by the probability density function (PDF):
 | |
| 
 | |
| __spaces f(x;[nu], [xi]) = ([xi][nu]/2)[super [nu]/2] e[super -[nu][xi]/2x] x[super -1-[nu]/2] / [Gamma]([nu]/2)
 | |
| 
 | |
| and Cumulative Density Function (CDF)
 | |
| 
 | |
| __spaces  F(x;[nu], [xi]) = [Gamma]([nu]/2, [nu][xi]/2x) / [Gamma]([nu]/2)
 | |
| 
 | |
| The following graphs illustrate how the PDF and CDF of the inverse chi_squared distribution
 | |
| varies for a few values of parameters [nu] and [xi]:
 | |
| 
 | |
| [graph inverse_chi_squared_pdf]  [/.png or .svg]
 | |
| 
 | |
| [graph inverse_chi_squared_cdf]
 | |
| 
 | |
| [h4 Member Functions]
 | |
| 
 | |
|    inverse_chi_squared_distribution(RealType df = 1); // Implicitly scaled 1/df.
 | |
|    inverse_chi_squared_distribution(RealType df = 1, RealType scale); // Explicitly scaled.
 | |
| 
 | |
| Constructs an inverse chi_squared distribution with [nu] degrees of freedom ['df],
 | |
| and scale ['scale] with default value 1\/df.
 | |
| 
 | |
| Requires that the degrees of freedom [nu] parameter is greater than zero, otherwise calls
 | |
| __domain_error.
 | |
| 
 | |
|    RealType degrees_of_freedom()const; 
 | |
|    
 | |
| Returns the degrees_of_freedom [nu] parameter of this distribution.
 | |
| 
 | |
|    RealType scale()const; 
 | |
|    
 | |
| Returns the scale [xi] parameter of this distribution.
 | |
| 
 | |
| [h4 Non-member Accessors]
 | |
| 
 | |
| All the [link math_toolkit.dist_ref.nmp usual non-member accessor functions] that are generic to all
 | |
| distributions are supported: __usual_accessors.
 | |
| 
 | |
| The domain of the random variate is \[0,+[infin]\].
 | |
| [note Unlike some definitions, this implementation supports a random variate 
 | |
| equal to zero as a special case, returning zero for both pdf and cdf.]
 | |
| 
 | |
| [h4 Accuracy]
 | |
| 
 | |
| The inverse gamma distribution is implemented in terms of the 
 | |
| incomplete gamma functions like the __inverse_gamma_distrib that use 
 | |
| __gamma_p and __gamma_q and their inverses __gamma_p_inv and __gamma_q_inv:
 | |
| refer to the accuracy data for those functions for more information.
 | |
| But in general, gamma (and thus inverse gamma) results are often accurate to a few epsilon,
 | |
| >14 decimal digits accuracy for 64-bit double.
 | |
| unless iteration is involved, as for the estimation of degrees of freedom.
 | |
| 
 | |
| [h4 Implementation]
 | |
| 
 | |
| In the following table [nu] is the degrees of freedom parameter and 
 | |
| [xi] is the scale parameter of the distribution,
 | |
| /x/ is the random variate, /p/ is the probability and /q = 1-p/ its complement.
 | |
| Parameters [alpha] for shape and [beta] for scale
 | |
| are used for the inverse gamma function: [alpha] = [nu]/2 and [beta] = [nu] * [xi]/2.
 | |
| 
 | |
| [table
 | |
| [[Function][Implementation Notes]]
 | |
| [[pdf][Using the relation: pdf = __gamma_p_derivative([alpha], [beta]/ x, [beta]) / x * x ]]
 | |
| [[cdf][Using the relation: p = __gamma_q([alpha], [beta] / x) ]]
 | |
| [[cdf complement][Using the relation: q = __gamma_p([alpha], [beta] / x) ]]
 | |
| [[quantile][Using the relation: x = [beta][space]/ __gamma_q_inv([alpha], p) ]]
 | |
| [[quantile from the complement][Using the relation: x = [alpha][space]/ __gamma_p_inv([alpha], q) ]]
 | |
| [[mode][[nu] * [xi] / ([nu] + 2) ]]
 | |
| [[median][no closed form analytic equation is known, but is evaluated as quantile(0.5)]]
 | |
| [[mean][[nu][xi] / ([nu] - 2) for [nu] > 2, else a __domain_error]]
 | |
| [[variance][2 [nu][pow2] [xi][pow2] / (([nu] -2)[pow2] ([nu] -4)) for [nu] >4, else a __domain_error]]
 | |
| [[skewness][4 [sqrt]2 [sqrt]([nu]-4) /([nu]-6) for [nu] >6, else a __domain_error ]]
 | |
| [[kurtosis_excess][12 * (5[nu] - 22) / (([nu] - 6) * ([nu] - 8)) for [nu] >8, else a __domain_error]]
 | |
| [[kurtosis][3 + 12 * (5[nu] - 22) / (([nu] - 6) * ([nu]-8)) for [nu] >8, else a __domain_error]]
 | |
| ] [/table]
 | |
| 
 | |
| [h4 References]
 | |
| 
 | |
| # Bayesian Data Analysis, Andrew Gelman, John B. Carlin, Hal S. Stern, Donald B. Rubin,
 | |
| ISBN-13: 978-1584883883, Chapman & Hall; 2 edition (29 July 2003).
 | |
| 
 | |
| # Bayesian Computation with R, Jim Albert, ISBN-13: 978-0387922973, Springer; 2nd ed. edition (10 Jun 2009)
 | |
| 
 | |
| [endsect] [/section:inverse_chi_squared_dist Inverse chi_squared Distribution]
 | |
| 
 | |
| [/ 
 | |
|   Copyright 2010 John Maddock and Paul A. Bristow.
 | |
|   Distributed under the Boost Software License, Version 1.0.
 | |
|   (See accompanying file LICENSE_1_0.txt or copy at
 | |
|   http://www.boost.org/LICENSE_1_0.txt).
 | |
| ] |