#!/bin/bash

Space=15;
Criteria="AR MER MRE";
Datasets="coc81 nasa93";
Runs=5;

generate() {
	for input in mwu_$2"_"$1"_"*
	do
		gawk	'BEGIN {FS = ","; OFS = "\t"}
				NR>1{
					split ($1,array,"|");
					if (array[1] == "None" && array[2] == "None" && array[3] == "lc") print 1*Space,$4 >> Method1;
					if (array[1] == "None" && array[2] == "DynamicLocomo-Mean" && array[3] == "lc") print 2*Space,$4 >> Method2;
					if (array[1] == "NewCocominWrapperMedian" && array[2] == "None" && array[3] == "lc") print 3*Space,$4 >> Method3;
					if (array[1] == "NewCocominWrapperMedian" && array[2] == "DynamicLocomo-Mean" && array[3] == "lc") print 4*Space,$4 >> Method4;
					if (array[1] == "LocalWrapper" && array[2] == "None" && array[3] == "lc") print 5*Space,$4 >> Method5;
					if (array[1] == "LSRWrapper" && array[2] == "None" && array[3] == "lsr") print 6*Space,$4 >> Method6;
					if (array[1] == "M5PWrapper" && array[2] == "None" && array[3] == "m5p") print 7*Space,$4 >> Method7;
					if (array[1] == "None" && array[2] == "NearestMRE" && array[3] == "None") print 8*Space,$4 >> Method8;
				}' Space=$Space Method1=Method1-Run$3-$1-$2 Method2=Method2-Run$3-$1-$2 Method3=Method3-Run$3-$1-$2 Method4=Method4-Run$3-$1-$2 Method5=Method5-Run$3-$1-$2 Method6=Method6-Run$3-$1-$2 Method7=Method7-Run$3-$1-$2 Method8=Method8-Run$3-$1-$2 $input;
	done
}

plot () {

gnuplot <<EOF

set terminal postscript eps "Helvetica" 16
set output "losses-run$1.eps" 

set multiplot

set origin 0,0.66
set size 0.5,0.33
unset label
set label "COC81 - AR" at 15,75
set nokey
set xtics ("1" $Space*1, "2" $Space*2, "3" $Space*3, "4" $Space*4, "5" $Space*5, "6" $Space*6, "7" $Space*7, "8" $Space*8)
set xtics nomirror
set ytics (0,20,40,60,80)
set ytics nomirror
set xrange [0:$Space*9]
set yrange [0:90]
set xlabel "Method Number"
set ylabel "Losses"

plot \
"Method1-Run$1-coc81-AR" using 1:2 with points pointsize 2 pointtype 2 notitle,\
"Method2-Run$1-coc81-AR" using 1:2 with points pointsize 2 pointtype 12 notitle,\
"Method3-Run$1-coc81-AR" using 1:2 with points pointsize 2 pointtype 4 notitle,\
"Method4-Run$1-coc81-AR" using 1:2 with points pointsize 2 pointtype 6 notitle,\
"Method5-Run$1-coc81-AR" using 1:2 with points pointsize 2 pointtype 8 notitle,\
"Method6-Run$1-coc81-AR" using 1:2 with points pointsize 2 pointtype 10 notitle,\
"Method7-Run$1-coc81-AR" using 1:2 with points pointsize 2 pointtype 14 notitle,\
"Method8-Run$1-coc81-AR" using 1:2 with points pointsize 2 pointtype 3 notitle

set origin 0.5,0.66
set size 0.5,0.33
unset label
set label "NASA93 - AR" at 15,75
set nokey
set xtics ("1" $Space*1, "2" $Space*2, "3" $Space*3, "4" $Space*4, "5" $Space*5, "6" $Space*6, "7" $Space*7, "8" $Space*8)
set xtics nomirror
set ytics (0,20,40,60,80)
set ytics nomirror
set xrange [0:$Space*9]
set yrange [0:90]
set xlabel "Method Number"
set ylabel "Losses"

plot \
"Method1-Run$1-nasa93-AR" using 1:2 with points pointsize 2 pointtype 2 notitle,\
"Method2-Run$1-nasa93-AR" using 1:2 with points pointsize 2 pointtype 12 notitle,\
"Method3-Run$1-nasa93-AR" using 1:2 with points pointsize 2 pointtype 4 notitle,\
"Method4-Run$1-nasa93-AR" using 1:2 with points pointsize 2 pointtype 6 notitle,\
"Method5-Run$1-nasa93-AR" using 1:2 with points pointsize 2 pointtype 8 notitle,\
"Method6-Run$1-nasa93-AR" using 1:2 with points pointsize 2 pointtype 10 notitle,\
"Method7-Run$1-nasa93-AR" using 1:2 with points pointsize 2 pointtype 14 notitle,\
"Method8-Run$1-nasa93-AR" using 1:2 with points pointsize 2 pointtype 3 notitle


set origin 0,0.33
set size 0.5,0.33
unset label
set label "COC81 - MER" at 15,75
set nokey
set xtics ("1" $Space*1, "2" $Space*2, "3" $Space*3, "4" $Space*4, "5" $Space*5, "6" $Space*6, "7" $Space*7, "8" $Space*8)
set xtics nomirror
set ytics (0,20,40,60,80)
set ytics nomirror
set xrange [0:$Space*9]
set yrange [0:90]
set xlabel "Method Number"
set ylabel "Losses"

plot \
"Method1-Run$1-coc81-MER" using 1:2 with points pointsize 2 pointtype 2 notitle,\
"Method2-Run$1-coc81-MER" using 1:2 with points pointsize 2 pointtype 12 notitle,\
"Method3-Run$1-coc81-MER" using 1:2 with points pointsize 2 pointtype 4 notitle,\
"Method4-Run$1-coc81-MER" using 1:2 with points pointsize 2 pointtype 6 notitle,\
"Method5-Run$1-coc81-MER" using 1:2 with points pointsize 2 pointtype 8 notitle,\
"Method6-Run$1-coc81-MER" using 1:2 with points pointsize 2 pointtype 10 notitle,\
"Method7-Run$1-coc81-MER" using 1:2 with points pointsize 2 pointtype 14 notitle,\
"Method8-Run$1-coc81-MER" using 1:2 with points pointsize 2 pointtype 3 notitle

set origin 0.5,0.33
set size 0.5,0.33
unset label
set label "NASA93 - MER" at 15,75
set nokey
set xtics ("1" $Space*1, "2" $Space*2, "3" $Space*3, "4" $Space*4, "5" $Space*5, "6" $Space*6, "7" $Space*7, "8" $Space*8)
set xtics nomirror
set ytics (0,20,40,60,80)
set ytics nomirror
set xrange [0:$Space*9]
set yrange [0:90]
set xlabel "Method Number"
set ylabel "Losses"

plot \
"Method1-Run$1-nasa93-MER" using 1:2 with points pointsize 2 pointtype 2 notitle,\
"Method2-Run$1-nasa93-MER" using 1:2 with points pointsize 2 pointtype 12 notitle,\
"Method3-Run$1-nasa93-MER" using 1:2 with points pointsize 2 pointtype 4 notitle,\
"Method4-Run$1-nasa93-MER" using 1:2 with points pointsize 2 pointtype 6 notitle,\
"Method5-Run$1-nasa93-MER" using 1:2 with points pointsize 2 pointtype 8 notitle,\
"Method6-Run$1-nasa93-MER" using 1:2 with points pointsize 2 pointtype 10 notitle,\
"Method7-Run$1-nasa93-MER" using 1:2 with points pointsize 2 pointtype 14 notitle,\
"Method8-Run$1-nasa93-MER" using 1:2 with points pointsize 2 pointtype 3 notitle


set origin 0,0
set size 0.5,0.33
unset label
set label "COC81 - MRE" at 15,75
set nokey
set xtics ("1" $Space*1, "2" $Space*2, "3" $Space*3, "4" $Space*4, "5" $Space*5, "6" $Space*6, "7" $Space*7, "8" $Space*8)
set xtics nomirror
set ytics (0,20,40,60,80)
set ytics nomirror
set xrange [0:$Space*9]
set yrange [0:90]
set xlabel "Method Number"
set ylabel "Losses"

plot \
"Method1-Run$1-coc81-MRE" using 1:2 with points pointsize 2 pointtype 2 notitle,\
"Method2-Run$1-coc81-MRE" using 1:2 with points pointsize 2 pointtype 12 notitle,\
"Method3-Run$1-coc81-MRE" using 1:2 with points pointsize 2 pointtype 4 notitle,\
"Method4-Run$1-coc81-MRE" using 1:2 with points pointsize 2 pointtype 6 notitle,\
"Method5-Run$1-coc81-MRE" using 1:2 with points pointsize 2 pointtype 8 notitle,\
"Method6-Run$1-coc81-MRE" using 1:2 with points pointsize 2 pointtype 10 notitle,\
"Method7-Run$1-coc81-MRE" using 1:2 with points pointsize 2 pointtype 14 notitle,\
"Method8-Run$1-coc81-MRE" using 1:2 with points pointsize 2 pointtype 3 notitle

set origin 0.5,0
set size 0.5,0.33
unset label
set label "NASA93 - MRE" at 15,75
set nokey
set xtics ("1" $Space*1, "2" $Space*2, "3" $Space*3, "4" $Space*4, "5" $Space*5, "6" $Space*6, "7" $Space*7, "8" $Space*8)
set xtics nomirror
set ytics (0,20,40,60,80)
set ytics nomirror
set xrange [0:$Space*9]
set yrange [0:90]
set xlabel "Method Number"
set ylabel "Losses"

plot \
"Method1-Run$1-nasa93-MRE" using 1:2 with points pointsize 2 pointtype 2 notitle,\
"Method2-Run$1-nasa93-MRE" using 1:2 with points pointsize 2 pointtype 12 notitle,\
"Method3-Run$1-nasa93-MRE" using 1:2 with points pointsize 2 pointtype 4 notitle,\
"Method4-Run$1-nasa93-MRE" using 1:2 with points pointsize 2 pointtype 6 notitle,\
"Method5-Run$1-nasa93-MRE" using 1:2 with points pointsize 2 pointtype 8 notitle,\
"Method6-Run$1-nasa93-MRE" using 1:2 with points pointsize 2 pointtype 10 notitle,\
"Method7-Run$1-nasa93-MRE" using 1:2 with points pointsize 2 pointtype 14 notitle,\
"Method8-Run$1-nasa93-MRE" using 1:2 with points pointsize 2 pointtype 3 notitle

unset multiplot

EOF

epstopdf losses-run$1.eps
rm Method*

}

for ((run = 1; run <= $Runs; run++))
do
	cd run$run

	for Method in Method*
	do
		if [ -f $Method ]; then
			rm Method*;
		fi
	done

	for criterion in $Criteria
	do
		for dataset in $Datasets
		do
			generate $dataset $criterion $run;
		done
	done
	plot $run;
	cd ..
done