#############################################################################################################
data() { cat <<EOF | gawk -F, '{;OFS=","; print $10,$80,$63,$64,$3,$4,$13,$14,$90,$73,$74,$100,$70,$93,$94,$77,$17,$78,$98,$85,$76,$5,$97,$86,$6,$20,$83,$84,$38,$75,$92,$67,$7,$96,$95,$60,$33,$34,$53,$54,$68,$81,$8,$71,$91,$18,$50,$61,$1,$28,$88,$43,$44,$89,$40,$48,$9,$51,$57,$2,$58,$99,$65,$37,$79,$72,$62,$27,$23,$24,$87,$30,$41,$55,$11,$16,$15,$45,$47,$56,$66,$46,$36,$31,$42,$26,$52,$25,$35,$12,$21,$32,$59,$69,$49,$19,$29,$39,$22,$82}' finnishmreValuesToWrite.txt
EOF
}

data|gawk -F, '{OFS="\t"; for(i=1;i<=NF;i++) if ($i>= T1 && $i<T2) print NR,i}' T1=0 T2=0.5> 2d20.dat
data|gawk -F, '{OFS="\t"; for(i=1;i<=NF;i++) if ($i>= T1 && $i<T2) print NR,i}' T1=0.5 T2=1> 2d40.dat
data|gawk -F, '{OFS="\t"; for(i=1;i<=NF;i++) if ($i>= T1 && $i<T2) print NR,i}' T1=1 T2=1.5> 2d60.dat
data|gawk -F, '{OFS="\t"; for(i=1;i<=NF;i++) if ($i>= T1 && $i<T2) print NR,i}' T1=1.5 T2=2> 2d80.dat
data|gawk -F, '{OFS="\t"; for(i=1;i<=NF;i++) if ($i>= T1) print NR,i}' T1=2> 2d100.dat

gnuplot <<EOF
set xrange [0:47]
set yrange [0:102]
set xlabel "Instance Indices" font "Times-Roman,20"
set ylabel "Pre-Processor+Method Indices" font "Times-Roman,20"
set title "MRE Values for Each Instance In Finnish Dataset" font "Times-Roman,20"
set terminal postscript eps
set output "finnishMREValues.eps
set key bottom right
set size 1.5,1.5
set pointsize 1
plot "2d20.dat" title "0.5%> & >=0%" with points 0 0,\
"2d40.dat" title "1.0%> & >=0.5%" with points 0 1,\
"2d60.dat" title "1.5%> & >=1.0%" with points 0 6 ,\
"2d80.dat" title "2%> & >=1.5%" with points 4 ,\
"2d100.dat" title ">=2%" with points 1 5  
EOF
epstopdf finnishMREValues.eps
