// g02cd Example Program Text // C# version, NAG Copyright 2008 using System; using NagLibrary; using System.Globalization; using System.IO; namespace NagDotNetExamples { public class G02CDE { static string datafile = "ExampleData/g02cde.d"; static void Main(String[] args) { if (args.Length == 1) { datafile = args[0]; } StartExample(); } public static void StartExample() { try { DataReader sr = new DataReader(datafile); const int n = 8; double xmiss, ymiss; int i; double[] result = new double[21]; double[] x = new double[n]; double[] y = new double[n]; int ifail; Console.WriteLine("g02cd Example Program Results"); // Skip heading in data file sr.Reset(); sr.Reset(); for (i = 1; i <= n; i++) { x[i - 1] = double.Parse(sr.Next(), CultureInfo.InvariantCulture); y[i - 1] = double.Parse(sr.Next(), CultureInfo.InvariantCulture); } Console.WriteLine(" "); Console.WriteLine(" {0}", " Case Independent Dependent"); Console.Write(" {0}", "number variable variable"); Console.WriteLine(" "); for (i = 1; i <= n; i++) { Console.Write(" {0}{1,15:f4}{2,15:f4}", i, x[i - 1], y[i - 1]); Console.WriteLine(" "); } Console.WriteLine(" "); Console.WriteLine(" "); // // Set up missing values // xmiss = 0.00e0; ymiss = 99.00e0; // G02.g02cd(n, x, y, xmiss, ymiss, result, out ifail); // if (ifail < 0) { Console.WriteLine(" "); Console.WriteLine("** g02cd failed with ifail = {0,5}", ifail); } else { if (ifail != 0) { Console.Write(" {0}{1,5}", "Routine fails, ifail =", ifail); } else { Console.WriteLine(" {0}{1,8:f4}", "Mean of independent variable = ", result[0]); Console.WriteLine(" {0}{1,8:f4}", "Mean of dependent variable = ", result[1]); Console.WriteLine(" {0}{1,8:f4}", "Standard deviation of independent variable = ", result[2]); Console.WriteLine(" {0}{1,8:f4}", "Standard deviation of dependent variable = ", result[3]); Console.WriteLine(" {0}{1,8:f4}", "Correlation coefficient = ", result[4]); Console.WriteLine(" "); Console.WriteLine(" {0}{1,8:f4}", "Regression coefficient = ", result[5]); Console.WriteLine(" {0}{1,8:f4}", "Standard error of coefficient = ", result[7]); Console.WriteLine(" {0}{1,8:f4}", "t-value for coefficient = ", result[9]); Console.WriteLine(" "); Console.WriteLine(" {0}", "Analysis of regression table :-"); Console.WriteLine(" "); Console.WriteLine(" {0}", " Source Sum of squares D.F. Mean square F-value"); Console.WriteLine(" "); Console.Write(" {0}", "Due to regression"); for (i = 12; i <= 15; i++) { Console.Write(" {0,11:f3}", result[i - 1]); } Console.WriteLine(" "); Console.Write(" {0}", "About regression"); for (i = 16; i <= 18; i++) { Console.Write(" {0,11:f3}", result[i - 1]); } Console.WriteLine(" "); Console.Write(" {0}", "Total "); for (i = 19; i <= 20; i++) { Console.Write(" {0,11:f3}", result[i - 1]); } Console.WriteLine(" "); Console.WriteLine(" "); Console.WriteLine(" {0}{1,3:f0}", "Number of cases used = ", result[20]); } } // } catch (Exception e) { Console.WriteLine(e.Message); Console.Write( "Exception Raised"); } } } }