Exemplo n.º 1
0
    public static void hypergeometric_cdf_values_test()
    //****************************************************************************80
    //
    //  Purpose:
    //
    //    HYPERGEOMETRIC_CDF_VALUES_TEST tests HYPERGEOMETRIC_CDF_VALUES.
    //
    //  Licensing:
    //
    //    This code is distributed under the GNU LGPL license.
    //
    //  Modified:
    //
    //    20 January 2007
    //
    //  Author:
    //
    //    John Burkardt
    //
    {
        double fx   = 0;
        int    pop  = 0;
        int    sam  = 0;
        int    succ = 0;
        int    x    = 0;

        Console.WriteLine("");
        Console.WriteLine("HYPERGEOMETRIC_CDF_VALUES_TEST:");
        Console.WriteLine("  HYPERGEOMETRIC_CDF_VALUES stores values of");
        Console.WriteLine("  the Hypergeometric CDF.");
        Console.WriteLine("");
        Console.WriteLine("     SAM    SUC   POP     X   HyperCDF(S,S,P)(X)");
        Console.WriteLine("");
        int n_data = 0;

        for (;;)
        {
            Hypergeometric.hypergeometric_cdf_values(ref n_data, ref sam, ref succ, ref pop, ref x, ref fx);
            if (n_data == 0)
            {
                break;
            }

            Console.WriteLine("  "
                              + sam.ToString(CultureInfo.InvariantCulture).PadLeft(8) + "  "
                              + succ.ToString(CultureInfo.InvariantCulture).PadLeft(8) + "  "
                              + pop.ToString(CultureInfo.InvariantCulture).PadLeft(8) + "  "
                              + x.ToString(CultureInfo.InvariantCulture).PadLeft(8) + "  "
                              + fx.ToString("0.################").PadLeft(24) + "");
        }
    }