source: GTP/trunk/Lib/Vis/Preprocessing/work/plots/ps_memory_plot @ 2147

#!/bin/sh
#unalias rm

rm -f *.tmpplot*

PFILE=plot.fig
FILE=tmp.plot
echo $FILE
rm -f $FILE
#echo set term postscript eps monochrome dashed \"Times-Roman\" 24 > $FILE
echo set term fig color fontsize 22 big landscape > $FILE
#echo set term postscript eps color solid > $FILE
echo set output \"$PFILE\" >> $FILE
#echo set term x11 > $FILE
#echo set grid >> $FILE 
STYLE=$1
echo set xlabel \"$2\" >> $FILE 
echo set ylabel \"$3\" >> $FILE
# echo set boxwidth 0.4 >> $FILE


echo set logscale y >> $FILE
echo -n plot >> $FILE

#echo -n " " 2*x*log\(x\)  title \"O\(k log k\)\" with lines" , " >>$FILE

PAR1=$2
PAR2=$3
NAME=A

shift
shift
shift    
for i in $* ; do
    echo $i ;
    echo $NAME
    grep -A 1 $PAR1 $i | grep -v "\-\-" | grep -v "#" > $i.tmpplot.x ;
    grep -A 1 $PAR2 $i | grep -v "\-\-" | grep -v "#" > $i.tmpplot.y ;
    paste $i.tmpplot.x $i.tmpplot.y > $i.tmpplot ;
    if test $i != $1 ; then echo -n ", ">>$FILE; fi
    echo -n " "\"$i.tmpplot\"  title \"$NAME\" with $STYLE" " >>$FILE ;
    YPLOT="$YPLOT $i.tmpplot.y";
    case $NAME in
    A) NAME=B;;
    B) NAME=C;;
    C) NAME=D;;
    D) NAME=E;;
    E) NAME=F;;
    F) NAME=G;;
    esac;
done ;
echo >> $FILE
paste $1.tmpplot.x $YPLOT | grep -v "#"

cat $FILE
gnuplot $FILE 
rm -f $FILE
rm -f *.tmpplot*