//      g13au Example Program Text
//      C# version, NAG Copyright 2008
using System;
using NagLibrary;
using System.Globalization;
namespace NagDotNetExamples
{
  public class G13AUE
  {
    static string datafile = "ExampleData/g13aue.d";
    static void Main(String[] args)
    {
      if (args.Length == 1)
      {
        datafile = args[0];
      }
      StartExample();
    }
    public static void StartExample()
    {
      try
      {
        DataReader sr = new DataReader(datafile);
        int i,   m,   n,   ngrps; 
        int ifail;
        Console.WriteLine("g13au Example Program Results");
        //      Skip heading in data file
        sr.Reset();
        sr.Reset();
        n = int.Parse(sr.Next());
        m = int.Parse(sr.Next());
        double[] mean = new double[50];
        double[] z = new double[n];
        if (n >= m && m >= 1)
        {
          sr.Reset();
          for (i = 1; i <= n; i++)
          {
            z[i - 1] = double.Parse(sr.Next(), CultureInfo.InvariantCulture);
          }
          Console.WriteLine("");
          Console.WriteLine(" {0}", "                                 Range-mean plot");
          Console.WriteLine("");
          ngrps = n / m;
          double[] y = new double[ngrps];
          int[] isort = new int[ngrps];
          //
          G13.g13au(n, z, m, ngrps, "RANGE", y, mean, out ifail);
          //
          //         Print Mean and Range
          Console.WriteLine("Group       Mean              Range");
          for (i=0; i<ngrps; i++)
          {
            Console.WriteLine ("{0, 3}   {1, 10:f2}         {2, 10:f2}", i, mean[i], y[i]);
          }
        }
      }
      catch (Exception e)
      {
        Console.WriteLine(e.Message);
        Console.WriteLine("Exception Raised");
      }
    }
  }
}