错误函数erf（x），在math.h中找不到visual studio 2005

Question

Visual Studio 2005的cmath似乎没有erf（x）。我正在使用NIST统计测试套件用于随机和伪随机数生成器。在cephes.c的方法中，双cephes_normal（double x），它使用了C99数学函数erf（x），我认为它不支持visual studio 2005.

我该如何克服这个问题？我在这里看到了一个C ++解决方案： http://social.msdn.microsoft.com/Forums/en-US/vcgeneral/thread/9f5f4bf4-c0ae-4620-8039-4dc36e98d718/

有人使用了boost C ++数学库。但我认为我不能将c ++标头包含在C源文件中。

Answer 1

一些谷歌搜索发现了这个C++ implementation（转载于此处）：

erf代码：

#include <cmath>

double erf(double x)
{
    // constants
    double a1 =  0.254829592;
    double a2 = -0.284496736;
    double a3 =  1.421413741;
    double a4 = -1.453152027;
    double a5 =  1.061405429;
    double p  =  0.3275911;

    // Save the sign of x
    int sign = 1;
    if (x < 0)
        sign = -1;
    x = fabs(x);

    // A&S formula 7.1.26
    double t = 1.0/(1.0 + p*x);
    double y = 1.0 - (((((a5*t + a4)*t) + a3)*t + a2)*t + a1)*t*exp(-x*x);

    return sign*y;
}

测试功能

void testErf()
{
    // Select a few input values
    double x[] = 
    {
        -3, 
        -1, 
        0.0, 
        0.5, 
        2.1 
    };

    // Output computed by Mathematica
    // y = Erf[x]
    double y[] = 
    { 
        -0.999977909503, 
        -0.842700792950, 
        0.0, 
        0.520499877813, 
        0.997020533344 
    };

    int numTests = sizeof(x)/sizeof(double);

    double maxError = 0.0;
    for (int i = 0; i < numTests; ++i)
    {
        double error = fabs(y[i] - erf(x[i]));
        if (error > maxError)
            maxError = error;
    }

    std::cout << "Maximum error: " << maxError << "\n";
}   

Answer 2

Numerical Recipes包含错误功能的实现（我的版本中的第6章）。

John D. Cook的博客中有一个Python implementation，看起来很容易翻译。

Answer 3

好吧，要么自己编写，要看一下boost实现，C-ify，然后使用它，或者不要将Visual Studio 2005用于这个项目，而是使用GCC (MinGW)之类的东西。 / p>