private static void test01(ref int seed)
//****************************************************************************80
//
// Purpose:
//
// TEST01 tests LATIN_CENTER.
//
// Licensing:
//
// This code is distributed under the GNU LGPL license.
//
// Modified:
//
// 01 March 2007
//
// Author:
//
// John Burkardt
//
{
const int DIM_NUM = 2;
const int POINT_NUM = 10;
Console.WriteLine();
Console.WriteLine("TEST01");
Console.WriteLine(" LATIN_CENTER chooses a Latin cell arrangement,");
Console.WriteLine(" and returns the centers of those cells.");
Console.WriteLine();
Console.WriteLine(" Spatial dimension = " + DIM_NUM);
Console.WriteLine(" Number of points = " + POINT_NUM);
Console.WriteLine(" Initial seed for UNIFORM = " + seed);
double[] x = LatinVariants.latin_center(DIM_NUM, POINT_NUM, ref seed);
Console.WriteLine();
Console.WriteLine(" The Latin centers:");
Console.WriteLine();
int k = 0;
for (int j = 0; j < POINT_NUM; j++)
{
int kk = k;
string cout = "";
for (int i = 0; i < DIM_NUM; i++)
{
cout += x[kk].ToString("0.########").PadLeft(10) + " ";
kk += POINT_NUM;
}
Console.WriteLine(cout);
k += 1;
}
}
private static void Main(string[] args)
//****************************************************************************80
//
// Purpose:
//
// MAIN is the main program for LATIN_CENTER_DATASET.
//
// Discussion:
//
// LATIN_CENTER_DATASET generates a Latin Center Square dataset
// and writes it to a file.
//
// Usage:
//
// latin_center_dataset m n seed
//
// where
//
// * M, the spatial dimension,
// * N, the number of points to generate,
// * SEED, the seed, a positive integer.
//
// creates an M by N dataset and writes it to the
// file "latin_center_M_N.txt".
//
// Licensing:
//
// This code is distributed under the GNU LGPL license.
//
// Modified:
//
// 15 December 2009
//
// Author:
//
// John Burkardt
//
{
int m;
int n;
int seed;
Console.WriteLine("");
Console.WriteLine("LATIN_CENTER_DATASET");
Console.WriteLine("");
Console.WriteLine(" Generate a Latin Center Square dataset.");
//
// Get the spatial dimension.
//
try
{
m = Convert.ToInt32(args[0]);
}
catch
{
Console.WriteLine("");
Console.WriteLine(" Enter the value of M");
m = Convert.ToInt32(Console.ReadLine());
}
Console.WriteLine("");
Console.WriteLine(" Spatial dimension M = " + m + "");
//
// Get the number of points.
//
try
{
n = Convert.ToInt32(args[1]);
}
catch
{
Console.WriteLine("");
Console.WriteLine(" Enter the number of points N");
n = Convert.ToInt32(Console.ReadLine());
}
Console.WriteLine(" Number of points N = " + n + "");
//
// Get the seed.
//
try
{
seed = Convert.ToInt32(args[2]);
}
catch
{
Console.WriteLine("");
Console.WriteLine(" Enter the value of SEED");
seed = Convert.ToInt32(Console.ReadLine());
}
Console.WriteLine(" The seed is = " + seed + "");
seed = seed switch
{
0 => entropyRNG.RNG.nextint(),
_ => seed
};
//
// Compute the data.
//
double[] r = new double[m * n];
r = LatinVariants.latin_center(m, n, ref seed);
//
// Write it to a file.
//
string output_filename = "latin_center_" + m + "_"
+ n + ".txt";
typeMethods.r8mat_write(output_filename, m, n, r);
Console.WriteLine("");
Console.WriteLine(" The data was written to the file \""
+ output_filename + "\".");
Console.WriteLine("");
Console.WriteLine("LATIN_CENTER_DATASET:");
Console.WriteLine(" Normal end of execution.");
Console.WriteLine("");
}
}