Exemple #1
0
 public void writeModel(string outModel)
 {
     if (pDic.Count == 0)
     {
         buildModel();
     }
     using (System.IO.StreamWriter sw = new System.IO.StreamWriter(outModel))
     {
         sw.WriteLine(dataPrepBase.modelTypes.KS.ToString());
         sw.WriteLine(String.Join(",", Variables));
         sw.WriteLine(StrataField);
         sw.WriteLine(Oridinate.ToString());
         string[] lbl = Labels;
         sw.WriteLine(String.Join(",", lbl));
         string[]   pArr  = new string[lbl.Length];
         string[]   sArr  = new string[lbl.Length];
         string[]   cArr1 = new string[lbl.Length];
         string[]   cArr2 = new string[lbl.Length];
         double[][] minmax1, minmax2, bp1, bp2;
         for (int i = 0; i < lbl.Length; i++)
         {
             string l = lbl[i];
             pArr[i] = String.Join(";", (from double d in pDic[l] select d.ToString()).ToArray());
             sArr[i] = String.Join(";", (from double d in sDic[l] select d.ToString()).ToArray());
             int[] cArr = cntDic[l];
             cArr1[i] = cArr[0].ToString();
             cArr2[i] = cArr[1].ToString();
         }
         sw.WriteLine(String.Join(",", pArr));
         sw.WriteLine(String.Join(",", sArr));
         sw.WriteLine(String.Join(",", cArr1));
         sw.WriteLine(String.Join(",", cArr2));
         for (int i = 0; i < lbl.Length; i++)
         {
             string l = lbl[i];
             minmax1 = minMaxDic1[l];
             minmax2 = minMaxDic2[l];
             sw.WriteLine(String.Join(",", (from double d in minmax1[0] select d.ToString()).ToArray()));
             sw.WriteLine(String.Join(",", (from double d in minmax1[1] select d.ToString()).ToArray()));
             sw.WriteLine(String.Join(",", (from double d in minmax2[0] select d.ToString()).ToArray()));
             sw.WriteLine(String.Join(",", (from double d in minmax2[1] select d.ToString()).ToArray()));
             bp1 = binPropDic1[l];
             bp2 = binPropDic2[l];
             for (int j = 0; j < Variables.Length; j++)
             {
                 sw.WriteLine(String.Join(",", (from double d in bp1[j] select d.ToString()).ToArray()));
                 sw.WriteLine(String.Join(",", (from double d in bp2[j] select d.ToString()).ToArray()));
             }
             sw.WriteLine(String.Join(",", (from int d in clusCountDic[l] select d.ToString()).ToArray()));
             sw.WriteLine(String.Join(",", (from int d in clusSampleCountDic[l] select d.ToString()).ToArray()));
         }
         string pcaPath = System.IO.Path.GetDirectoryName(outModel) + "\\" + System.IO.Path.GetFileNameWithoutExtension(outModel) + "_pca.mdl";
         pca.writeModel(pcaPath);
         sw.WriteLine(pcaPath);
         string clustPath = System.IO.Path.GetDirectoryName(outModel) + "\\" + System.IO.Path.GetFileNameWithoutExtension(outModel) + "_cluster.mdl";
         cluster.writeModel(clustPath);
         sw.WriteLine(clustPath);
         sw.Close();
     }
 }
Exemple #2
0
        public void getReport()
        {
            Forms.RunningProcess.frmRunningProcessDialog rd = new Forms.RunningProcess.frmRunningProcessDialog(false);
            rd.Text               = "Kolmogorov Smirnov Two sample distribution Results (p-value for unequal distributions)";
            rd.TopLevel           = true;
            rd.pgbProcess.Visible = false;
            rd.FormBorderStyle    = System.Windows.Forms.FormBorderStyle.Sizable;
            rd.addMessage("Vars:  " + String.Join(", ", Variables));
            rd.addMessage("Perform PCA " + Oridinate.ToString());
            rd.addMessage("Strata Field = " + StrataField);
            rd.addMessage("\n Label   | Statistic  | WP value   | WS p-value");
            rd.addMessage("-".PadRight(48, '-'));
            for (int i = 0; i < Labels.Length; i++)
            {
                string ky   = Labels[i];
                double stat = StatisticValues[i];
                string sVl  = stat.ToString();
                double vl   = PValues[i];
                string fVl  = vl.ToString();
                if (vl < 0.0001)
                {
                    fVl = "p < 0.0001";
                }
                double wVl    = WSpvalues[i];
                string wspStr = wVl.ToString();
                if (wVl < 0.0001)
                {
                    wspStr = "p < 0.0001";
                }
                string l   = ModelHelper.getValue(ky, 8);
                string wp  = ModelHelper.getValue(fVl, 10);
                string s   = ModelHelper.getValue(sVl, 10);
                string wsp = ModelHelper.getValue(wspStr, 10);
                rd.addMessage(l + " | " + s + " | " + wp + " | " + wsp);
            }
            rd.addMessage("-".PadRight(48, '-'));

            if (ModelHelper.chartingAvailable())
            {
                createKSchart();
            }
            rd.enableClose();
            rd.Show();
        }