#     1	Attribute
#     2	value
#     3	score
#     4	avgE
#     5	sdE
#     6	medE
#     7	spE
#     8	avgEffort
#     9	sdEffort
#    10	medEffort
#    11	spEffort
#    12	avgDefects
#    13	sdDefects
#    14	medDefects
#    15	spDefects
#    16	avgThreat
#    17	sdThreat
#    18	medThreat
#    19	spThreat

Here=`pwd`
Tmp=`mktemp -d`
cd $Tmp
echo $Tmp
files="ares kc1"
tac() { gawk '{X[++N]=$1} END {for(I=N;I>=1;I--) print X[I]}' $1;  }
plot0() {
	stem="$3_$2"
	gnuplot<<EOF
			#set title "$2"
			set terminal postscript eps
		    set output "$stem.eps"	
			set size 0.7,0.3
			set noxlabel 
			set yrange [0:]
			set ylabel 	"$3"
			plot "$1" using 1:2 title "median" with lines,\
				 "$1" using 1:3 title "spread" with linesp
EOF
	#ls -lsa
	epstopdf $stem.eps
	mv $stem.pdf $Here/$stem.pdf
}
plot1() {
	stem="$3_$2"
	gnuplot<<EOF
			#set title "$2"
			set terminal postscript eps
		    set output "$stem.eps"	
			set size 0.7,0.3
			set noxlabel 
			set yrange [0:]
			set ylabel 	"$3"
			plot "$1" using 1:2 title "median" with lines,\
				 "$1" using 1:3 title "spread" with linesp
EOF
	#ls -lsa
	epstopdf $stem.eps
	mv $stem.pdf $Here/$stem.pdf
}
plot2() {
	stem="$3_$2"
	gnuplot<<EOF
			#set title "$2"
			set terminal postscript eps
		    set output "$stem.eps"	
			set size 0.7,0.3
			set noxlabel 
			set yrange [0:]
			set ylabel 	"$3"
			plot "$1" using 1:2 title "estimated" with lines,\
				 "$1" using 1:3 title "actual" with linesp

EOF
	#ls -lsa
	epstopdf $stem.eps
	mv $stem.pdf $Here/$stem.pdf
}
for f in $files
do
		tac $Here/$f.csv | gawk -F, '{OFS=","; print ++N, $1, $2}' > $Here/${f}Report.csv
        tac $Here/$f.csv | gawk -F, '{OFS="\t"; ++N; print N ,$3, $6, $7}' > dat; plot2 dat $f Effect
        tac $Here/$f.csv | gawk -F, '{OFS="\t"; ++N; print N ,$6, $7}' > dat; plot0 dat $f Energy
		tac $Here/$f.csv | gawk -F, '{OFS="\t"; ++N; print N ,$10, $11}' > dat; plot0 dat $f Effort
		tac $Here/$f.csv | gawk -F, '{OFS="\t"; ++N; print N ,$14, $15}' > dat; plot0 dat $f Defects
		tac $Here/$f.csv | gawk -F, '{OFS="\t"; ++N; print N ,$18, $19}' > dat; plot1 dat $f Threats
done