Repository of scripts used by IRIDIA members - Revision history

Mmanfrin: /* Max's scripts */

2007-01-07T20:49:42Z

Max's scripts

2007-01-07T20:49:19Z

Max's scripts

2007-01-07T20:48:54Z

Max's scripts

2006-08-31T20:22:40Z

Boxplot of solution values by algorithm

2006-08-31T20:20:48Z

Boxplot of solution values by algorithm

2006-08-31T20:18:23Z

Boxplot of solution values by algorithm

2006-08-31T20:18:00Z

Boxplot of solution values by algorithm

2006-08-31T20:16:43Z

Boxplot of solution values by algorithm

2006-08-31T20:15:42Z

Boxplot of solution values by algorithm

2006-08-31T20:15:05Z

Max's scripts

@@ Line 18: / Line 18: @@
 | |
 | |-+ algorithm2
-| | |
+|   |
-| | |-+ instance1
+|   |-+ instance1
-| | |
+|   |
-| | |-+ instance2
+|   |-+ instance2
+|
 |-+ sh   (contains the script to launch the experiments)

@@ Line 26: / Line 26: @@
+|
 |-+ src   (contains the sources of the algorithms)
 | |-+ algorithm1
 | |

@@ Line 10: / Line 10: @@
+|
 |-+ out   (contains the outputs of the trial)
+|
 |-+ sh   (contains the script to launch the experiments)
+|
 |-+ src   (contains the sources of the algorithms)
+|
 |-+ analysis    (contains the R script to boxplot the experimental data)

@@ Line 93: / Line 93: @@
 resRW39102OPT<-read.table("rw.3.9.10_2-opt_100_1000.txt",header=TRUE)
-res<-rbind(resRW1x102OPT,resRW26102OPT,resRW27102OPT,resRW28102OPT,resRW29102OPT,resRW36102OPT,resRW37102OPT,resRW38102OPT,resRW39102OPT,resHC1x102OPT,resHC26102OPT,resHC27102OPT,resHC28102OPT,resHC29102OPT,resHC36102OPT,resHC37102OPT,resHC38102OPT,resHC39102OPT,resPIR2OPT,resSEQ2OPT,resSEQ22OPT)
+res<-rbind(resRW1x102OPT,resRW26102OPT,resRW27102OPT,resRW28102OPT,resRW29102OPT,
@@ Line 123: / Line 126: @@
         par(mar=c(5,5,5,3),cex.axis=0.7,las=2,mgp=c(4, 1, 0))
         title_plot=paste("2 CPU - 1000 iterations - instance ",linstance[i],sep="")
-        boxplot(l,xlab="",ylab="solution value",names=c(levels(bestalgo$idalgo)),main=title_plot,yaxt="n",ylim=c(min(min(bestalgo.temp$best),optimal_values[optimal_values$instance==linstance[i],]$optimum),max(bestalgo.temp$best)))
+        boxplot(l,xlab="",ylab="solution value",names=c(levels(bestalgo$idalgo)),main=title_plot,
-        axis(2, seq(from=min(min(bestalgo.temp$best),optimal_values[optimal_values$instance==linstance[i],]$optimum),to=max(bestalgo.temp$best),length.out=10))
+yaxt="n",ylim=c(min(min(bestalgo.temp$best),optimal_values[optimal_values$instance==linstance[i],]$optimum),
         abline(h=optimal_values[optimal_values$instance==linstance[i],]$optimum)
         grid(nx=0, ny=55,col="gray5")

@@ Line 36: / Line 36: @@
-in the files "'algorithms.txt'" I put the algorithms details
+in the files '''algorithms.txt''' I put the algorithms details
 <pre>
 idalgo          topo    schema  ls      type    number_of_cpus

@@ Line 28: / Line 28: @@
 in the file '''optimal_values.txt''' I put the best-known solution values for the problem instances I'm testing
 <pre>
 instance   optimum
 sko100a    152002
@@ Line 40: / Line 38: @@
 in the files "algorithm.txt" I put the algorithms details
 <pre>
 idalgo          topo    schema  ls      type    number_of_cpus
 PIR-2opt        PIR     PIR     2       Par     2
@@ Line 58: / Line 53: @@
 in the files '''algorithm_factors_instance-size_cut-time.txt''' I record the history of the search of the algo for the instance
 <pre>
 idalgo          topo    schema  ls      type    cpu_id  instance        try     best    time    iteration
 SEQ-2opt        SEQ     SEQ     2       Seq     0       sko100a         1       155468  0.31    1

@@ Line 14: / Line 14: @@
+|
 |-+ src   (contains the sources of the algorithms)
 </pre>
@@ Line 33: / Line 35: @@
 tai100a    21059006
 tai100b    1185996137
 </pre>
@@ Line 136: / Line 154: @@
         dev.off()
+}
 </pre>