sga-commit Mailing List for sga

SourceForge Headquarters 1320 Columbia Street Suite 310 San Diego, CA 92101 +1 (858) 422-6466

Revision: 72
          http://sga.svn.sourceforge.net/sga/?rev=72&view=rev
Author:   fragmad
Date:     2008-10-07 21:05:11 +0000 (Tue, 07 Oct 2008)

Log Message:
-----------
Modified branches/will/code/sga.c on 07/10/08

 - Added quiet mode.
   On executing sga with the -q option (sga -q), sga displays only the inital starting statistics and final population and fitness convergence. Intention is remove clutter from terminal while developing. Possibly handy in future if fitness functions start giving out real answers. 

 - Issue found
   longnames options. It simply doesn't work. Will endevour to solve. Slightly weary as to its use now a few months have past. Probably will scrap it but keep the gnu option code in place.

Will.

Modified Paths:
--------------
    branches/will/code/sga.c

Modified: branches/will/code/sga.c
===================================================================

--- branches/will/code/sga.c	2008-07-04 16:31:07 UTC (rev 71)
+++ branches/will/code/sga.c	2008-10-07 21:05:11 UTC (rev 72)
@@ -70,7 +70,7 @@
 #endif                      /* endif NOGSL                            */
 
 
-
+int    quiet = 0;
 char   curr[1000][80],      /* current generation */
        next[1000][80];      /* next generation    */
 int    fit[1000],           /* fitness values     */
@@ -101,8 +101,8 @@
 void accept_options(int argc, char *argv[])
 {
     int opt;
-    char cmdstring[20] = {'p',':','c',':','x',':','m',':','f',':','b',':',
-                               'r',':','g',':','s',':','d',':'};
+    char cmdstring[21] = {'p',':','c',':','x',':','m',':','f',':','b',':',
+                               'r',':','g',':','s',':','d',':','q'};
     
     struct option longopts[] = {
         {"popsize",1,NULL,'p'},
@@ -112,7 +112,7 @@
         {"fitfunc",1,NULL,'f'},
         {"boostfit",1,NULL,'b'},
         {"rseed",1,NULL,'r'},
-        {"generations",1,NULL,'g'},
+        {"gens",1,NULL,'g'},
         {"sizedisplay",1,NULL,'s'},
         {"displfreq",1,NULL,'d'},
 	{0,0,0,0}};
@@ -122,7 +122,7 @@
         case 'p':
             popsize = atoi(optarg);
             if (popsize < 1) { 
-              popsize = 300; 
+              popsize = 1; 
             }            
             break;
         case 'c':
@@ -178,6 +178,9 @@
               displfreq = 1; 
             }
             break;
+	case 'q':
+            quiet = 1;
+            break;
         case ':':
             printf("option needs a value\n");
             break;
@@ -348,34 +351,36 @@
   std_dev = sqrt(std_dev);
   if ((!*fcptr) && (std_dev==0))            /* if fit converged   */
     *fcptr = gen;
-  printf("gen=%d  best=%d  worst=%d  mean=%.2f  std.dev.=%.2f\n",
-          gen, best, worst, mean, std_dev);
-  for (i=0; i<chromsize; i++)              /* init column counts */
-    count[i] = 0;
-  for (i=0; i<sizedispl; i++) { 
-    for (j=0; j<chromsize; j++) {          /* show individuals   */
-      putchar(curr[i][j]);
-      count[j] += curr[i][j] - '0';        /* sum columns in pop */
+
+  if (!quiet){
+    printf("gen=%d  best=%d  worst=%d  mean=%.2f  std.dev.=%.2f\n",
+            gen, best, worst, mean, std_dev);
+    for (i=0; i<chromsize; i++)              /* init column counts */
+      count[i] = 0;
+    for (i=0; i<sizedispl; i++) { 
+      for (j=0; j<chromsize; j++) {          /* show individuals   */
+        putchar(curr[i][j]);
+        count[j] += curr[i][j] - '0';        /* sum columns in pop */
+      }
+      printf("\n");
     }
-    printf("\n");
+    for (; i<popsize; i++)
+      for (j=0; j<chromsize; j++)
+        count[j] += curr[i][j] - '0';
+    pc_count = 0;
+    for (i=0; i<chromsize; i++) {
+      if ((count[i]!=0) && (count[i]!=popsize))
+        count[i] = count[i]*10/popsize + '0';
+      else {
+        count[i] = '-';
+        pc_count++;
+      }
+      putchar(count[i]);
+    } 
+    if ((!*pcptr) && (pc_count==chromsize))   /* if pop converged */
+      *pcptr = gen;
+    printf("\n--------------------------------------------------\n");
   }
-  for (; i<popsize; i++)
-    for (j=0; j<chromsize; j++)
-      count[j] += curr[i][j] - '0';
-  pc_count = 0;
-  for (i=0; i<chromsize; i++) {
-    if ((count[i]!=0) && (count[i]!=popsize))
-      count[i] = count[i]*10/popsize + '0';
-    else {
-      count[i] = '-';
-      pc_count++;
-    }
-    putchar(count[i]);
-  }
-  if ((!*pcptr) && (pc_count==chromsize))   /* if pop converged */
-    *pcptr = gen;
-  printf("\n--------------------------------------------------\n");
-
   if (last_gen) {
     printf("fitness converged at generation %d\n", *fcptr);
     printf("population converged at generation %d\n", *pcptr);


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.




2007	Jan	Feb	Mar	Apr	May	Jun	Jul	Aug	Sep	Oct	Nov	Dec (9)
2008	Jan (5)	Feb (55)	Mar (1)	Apr	May	Jun (1)	Jul (2)	Aug	Sep	Oct (1)	Nov	Dec

sga-commit Mailing List for sga

sga-commit — Mailing list for svn commit messages