Example #1
0
 /**
 * Train Perceptrons
 */
 public function train_perceptrons()
 {
     $color = 0;
     $bgcolors = array('#efefef', '#fefefe');
     fms_open_center();
     fms_h2("Single-Layer Perceptrons (SLP): Delta Rule");
     fms_open_table(0, 'white', $this->width, 2, 2);
     fms_open_table_row();
     fms_write_table_col("silver", "center valign=bottom", "", "", $fontColor, $fontSize, "N");
     for ($j = 0; $j < $this->matrix->columns($this->x); $j++) {
         fms_write_table_col("silver", "center valign=bottom", "", "", $fontColor, $fontSize, "-" . $j . "-<br>Actual");
     }
     fms_write_table_col("silver", "center valign=bottom", "", "", $fontColor, $fontSize, "Desired<br>Outcome");
     for ($j = 0; $j < $this->matrix->columns($this->x); $j++) {
         fms_write_table_col("silver", "center valign=bottom", "", "", $fontColor, $fontSize, "-" . $j . "-<br>Weight");
     }
     for ($j = 0; $j < $this->matrix->columns($x); $j++) {
         fms_write_table_col("silver", "center valign=bottom", "", "", $fontColor, $fontSize, "-" . $j . "-<br>Class");
     }
     fms_write_table_col("silver", "center valign=bottom", "", "", $fontColor, $fontSize, "Sum");
     fms_write_table_col("silver", "center valign=bottom", "", "", $fontColor, $fontSize, "Forecast");
     fms_write_table_col("silver", "center valign=bottom", "", "", $fontColor, $fontSize, "Residual");
     fms_write_table_col("silver", "center valign=bottom", "", "", $fontColor, $fontSize, "Weighted<br>Diff");
     for ($j = 0; $j < $this->matrix->columns($this->x); $j++) {
         fms_write_table_col("silver", "center valign=bottom", "", "", $fontColor, $fontSize, "-" . $j . "-<br>Adjusted<br>Weight");
     }
     fms_close_table_row();
     fms_open_table_row();
     for ($i = 0; $i < $this->matrix->rows($this->x); $i++) {
         $sum = 0;
         fms_alternateColor();
         fms_open_table_row();
         fms_write_table_col($bgcolors[$color], "right", "", "", $fontColor, $fontSize, number_format($i + 1, 0));
         for ($j = 0; $j < $this->matrix->columns($this->x); $j++) {
             fms_write_table_col($bgcolors[$color], "right", 75, "", $fontColor, $fontSize, number_format($this->x[$i][$j], 0));
         }
         fms_write_table_col($bgcolors[$color], "right", 75, "", $fontColor, $fontSize, number_format($this->y[$i], 0));
         for ($j = 0; $j < $this->matrix->columns($this->x); $j++) {
             fms_write_table_col($bgcolors[$color], "right", 75, "", $fontColor, $fontSize, number_format($this->w[$j], 1));
         }
         for ($j = 0; $j < $this->matrix->columns($this->x); $j++) {
             fms_write_table_col($bgcolors[$color], "right", 75, "", $fontColor, $fontSize, number_format($this->w[$j] * $this->x[$i][$j], 1));
             $sum += $this->w[$j] * $this->x[$i][$j];
         }
         fms_write_table_col($bgcolors[$color], "right", 75, "", $fontColor, $fontSize, number_format($sum, 1));
         if ($sum > $this->threshold) {
             $predict = 1;
         } else {
             $predict = 0;
         }
         fms_write_table_col($bgcolors[$color], "right", 75, "", $fontColor, $fontSize, $predict);
         $residual = $this->y[$i] - $predict;
         fms_write_table_col($bgcolors[$color], "right", 75, "", $fontColor, $fontSize, number_format($residual, 0));
         $diff = $residual * $this->eta;
         fms_write_table_col($bgcolors[$color], "right", 75, "", $fontColor, $fontSize, number_format($diff, 1));
         for ($j = 0; $j < $this->matrix->columns($this->x); $j++) {
             $this->w[$j] = $this->w[$j] + $this->x[$i][$j] * $diff;
             fms_write_table_col($bgcolors[$color], "right", 75, "", $fontColor, $fontSize, number_format($this->w[$j], 1));
         }
         fms_close_table_row();
     }
     fms_close_table();
     fms_close_center();
 }
Example #2
0
 /**
 * Training neurons (calculate weights)
 */
 public function train_neurons()
 {
     if ($this->debug) {
         $color = 0;
         $bgcolors = array('#efefef', '#fefefe');
         fms_open_center();
         fms_h2("Training Neurons with the Delta Rule");
         /* Column Headings */
         fms_open_table(0, 'white', $this->report_width, 2, 2);
         fms_open_table_row();
         for ($j = 0; $j < $this->matrix->columns($this->x); $j++) {
             fms_write_table_col("silver", "center valign=bottom", "", "", $fontColor, $fontSize, "PRICE-" . chr(65 + $j));
         }
         fms_write_table_col("silver", "center valign=bottom", "", "", $fontColor, $fontSize, "MAX");
         fms_write_table_col("silver", "center valign=bottom", "", "", $fontColor, $fontSize, "ETA");
         fms_close_table_row();
         fms_open_table_row();
         for ($j = 0; $j < $this->matrix->columns($this->x); $j++) {
             fms_write_table_col($bgcolors[$color], "right", "", "", $fontColor, $fontSize, number_format($this->price[$j], 0));
         }
         fms_write_table_col($bgcolors[$color], "right", "", "", $fontColor, $fontSize, number_format($this->max_items, 0));
         fms_write_table_col($bgcolors[$color], "right", "", "", $fontColor, $fontSize, number_format($this->eta, 6));
         fms_close_table_row();
         fms_close_table();
         fms_open_table(0, 'white', $this->report_width, 2);
         fms_open_table_row();
         fms_write_table_col("silver", "center valign=bottom", "", "", $fontColor, $fontSize, "N");
         for ($j = 0; $j < $this->matrix->columns($this->x); $j++) {
             fms_write_table_col("silver", "center valign=bottom", "", "", $fontColor, $fontSize, "X({$j})");
         }
         fms_write_table_col("silver", "center valign=bottom", "", "", $fontColor, $fontSize, "TOTAL");
         for ($j = 0; $j < $this->matrix->columns($this->x); $j++) {
             fms_write_table_col("silver", "center valign=bottom", "", "", $fontColor, $fontSize, "F({$j})");
         }
         fms_write_table_col("silver", "center valign=bottom", "", "", $fontColor, $fontSize, "TOTAL");
         fms_write_table_col("silver", "center valign=bottom", "", "", $fontColor, $fontSize, "RESIDUAL");
         for ($j = 0; $j < $this->matrix->columns($this->x); $j++) {
             fms_write_table_col("silver", "center valign=bottom", "", "", $fontColor, $fontSize, "D({$j})");
         }
         fms_close_table_row();
         fms_break();
     }
     /* Matrix */
     for ($i = 0; $i < $this->matrix->rows($this->x); $i++) {
         if ($this->debug) {
             fms_alternateColor();
             fms_open_table_row();
             fms_write_table_col($bgcolors[$color], "right", "", "", $fontColor, $fontSize, number_format($i + 1, 0));
         }
         for ($j = 0; $j < $this->matrix->columns($this->x); $j++) {
             if ($this->debug) {
                 fms_write_table_col($bgcolors[$color], "right", "", "", $fontColor, $fontSize, number_format($this->x[$i][$j], 0));
             }
             $x_price[$i] += $this->x[$i][$j] * $this->price[$j];
         }
         if ($this->debug) {
             fms_write_table_col($bgcolors[$color], "right", "", "", $fontColor, $fontSize, number_format($x_price[$i], 0));
         }
         for ($j = 0; $j < $this->matrix->columns($this->x); $j++) {
             if ($i > 0) {
                 $this->f[$j] += $this->d[$j];
             }
             if ($this->debug) {
                 fms_write_table_col($bgcolors[$color], "right", "", "", $fontColor, $fontSize, number_format($this->f[$j], 0));
             }
             $f_price[$i] += $this->x[$i][$j] * $this->f[$j];
         }
         $this->residual = $x_price[$i] - $f_price[$i];
         if ($this->debug) {
             fms_write_table_col($bgcolors[$color], "right", "", "", $fontColor, $fontSize, number_format($f_price[$i], 0));
             fms_write_table_col($bgcolors[$color], "right", "", "", $fontColor, $fontSize, number_format($this->residual, 0));
         }
         for ($j = 0; $j < $this->matrix->columns($this->x); $j++) {
             $this->d[$j] = $this->x[$i][$j] * $this->residual * $this->eta;
             if ($this->debug) {
                 fms_write_table_col($bgcolors[$color], "right", "", "", $fontColor, $fontSize, number_format($this->d[$j], 0));
             }
         }
         if ($this->debug) {
             fms_close_table_row();
         }
     }
     if ($this->debug) {
         fms_close_table();
         fms_close_center();
     }
 }