private static void runs_pdf_test()
//****************************************************************************80
//
// Purpose:
//
// RUNS_PDF_TEST tests RUNS_PDF.
//
// Licensing:
//
// This code is distributed under the GNU LGPL license.
//
// Modified:
//
// 03 April 2016
//
// Author:
//
// John Burkardt
//
{
int n;
Console.WriteLine("");
Console.WriteLine("RUNS_PDF_TEST");
Console.WriteLine(" RUNS_PDF evaluates the Runs PDF;");
Console.WriteLine("");
Console.WriteLine(" M is the number of symbols of one kind,");
Console.WriteLine(" N is the number of symbols of the other kind,");
Console.WriteLine(" R is the number of runs (sequences of one symbol)");
Console.WriteLine("");
Console.WriteLine(" M N R PDF");
Console.WriteLine("");
const int m = 6;
for (n = 0; n <= 9; n++)
{
Console.WriteLine("");
double pdf_total = 0.0;
int r;
for (r = 1; r <= 2 * Math.Min(m, n) + 2; r++)
{
double pdf = Runs.runs_pdf(m, n, r);
Console.WriteLine(" " + m.ToString(CultureInfo.InvariantCulture).PadLeft(8)
+ " " + n.ToString(CultureInfo.InvariantCulture).PadLeft(8)
+ " " + r.ToString(CultureInfo.InvariantCulture).PadLeft(8)
+ " " + pdf.ToString(CultureInfo.InvariantCulture).PadLeft(14) + "");
pdf_total += pdf;
}
Console.WriteLine(" " + m.ToString(CultureInfo.InvariantCulture).PadLeft(8)
+ " " + " "
+ " " + " "
+ " " + pdf_total.ToString(CultureInfo.InvariantCulture).PadLeft(14) + "");
}
}