55 lines
2.0 KiB
C#
55 lines
2.0 KiB
C#
|
using System;
|
||
|
|
using static System.Math;
|
||
|
|
|
||
|
|
namespace Unity.PerformanceTesting.Statistics
|
||
|
|
{
|
||
|
|
static class NormalDistributionHelper
|
||
|
|
{
|
||
|
|
/// <summary>
|
||
|
|
/// ACM Algorithm 209: Gauss
|
||
|
|
///
|
||
|
|
/// Calculates $(1/\sqrt{2\pi}) \int_{-\infty}^x e^{-u^2 / 2} du$
|
||
|
|
/// by means of polynomial approximations due to A. M. Murray of Aberdeen University;
|
||
|
|
///
|
||
|
|
/// See: http://dl.acm.org/citation.cfm?id=367664
|
||
|
|
/// </summary>
|
||
|
|
/// <param name="x">-infinity..+infinity</param>
|
||
|
|
/// <returns>Area under the Standard Normal Curve from -infinity to x</returns>
|
||
|
|
public static double Gauss(double x)
|
||
|
|
{
|
||
|
|
double z;
|
||
|
|
if (Abs(x) < 1e-9)
|
||
|
|
z = 0.0;
|
||
|
|
else
|
||
|
|
{
|
||
|
|
var y = Abs(x) / 2;
|
||
|
|
if (y >= 3.0)
|
||
|
|
z = 1.0;
|
||
|
|
else if (y < 1.0)
|
||
|
|
{
|
||
|
|
var w = y * y;
|
||
|
|
z = ((((((((0.000124818987 * w - 0.001075204047) * w
|
||
|
|
+ 0.005198775019) * w - 0.019198292004) * w
|
||
|
|
+ 0.059054035642) * w - 0.151968751364) * w
|
||
|
|
+ 0.319152932694) * w - 0.531923007300) * w
|
||
|
|
+ 0.797884560593) * y * 2.0;
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
y = y - 2.0;
|
||
|
|
z = (((((((((((((-0.000045255659 * y + 0.000152529290) * y
|
||
|
|
- 0.000019538132) * y - 0.000676904986) * y
|
||
|
|
+ 0.001390604284) * y - 0.000794620820) * y
|
||
|
|
- 0.002034254874) * y + 0.006549791214) * y
|
||
|
|
- 0.010557625006) * y + 0.011630447319) * y
|
||
|
|
- 0.009279453341) * y + 0.005353579108) * y
|
||
|
|
- 0.002141268741) * y + 0.000535310849) * y
|
||
|
|
+ 0.999936657524;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
return x > 0.0 ? (z + 1.0) / 2 : (1.0 - z) / 2;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|