Contents

function ret=EE99contTime4Latex20131208()

绘制实验结果图 % \caption{ Observed accumulated angular displacement $\Theta$ of the four treatments (each including four 900-seconds'sessions).

 \label{fig:AccAngDisp2}
}
F:\CycleFT0801\RPSEE99stata\EE99latex\EE99_20131208.tex
       pathTOsave='E:\LatexFiles2011Jan\game0921\ITPv0403\ToHJ0429\RPSresub0506\TASP0526forEnEdit';
        pathTOsave='F:\CycleFT0801\RPSEE99stata\EE99latex';
%         c=load('C:\Users\ibm\Documents\MATLAB\TASP2010\ResultsConTimeEE99\ResultsConTimeEE99\130612AMOMVeLacc2013-06-13.csv');
        c=load('F:\CycleFT0801\RPSEE99stata\fromMallab20131208\ResultsConTimeEE99\130612AMOMVeLacc2013-06-13.csv');
        plotDis(c,pathTOsave)
end

function ret=plotDis(c,pathTOsave)
                        clf
            co=[0.42,0.45,1;0.19,0.71,0.37; 0.80,0.00,1.00; 1.00,0.50,0.50];
            To={'Game-1, CI'  'Game-1, II'  'Game-2, CI' 'Game-2, II'};
                axis([ 0 900 0  400]); axis square;
                xlabel(' Time (in second)');
                ylabel('Accumulated Angular Displacement \it{\Theta}'); hold on;
                   for infid=1:2
                        for gid=1:2
                                 r=find( c(:,2)==infid & c(:,1)==gid);
                                   plot(c(r,7),c(r,14), 'r.','color', co(gid*2-2+infid,:),'MarkerSize',4);  hold on
                                   line([50 150],[350-(gid*2-2+infid)*25 350-(gid*2-2+infid)*25], ...
                                          'Color', co(gid*2-2+infid,:), 'LineWidth', 2);                    hold on
                                   text(160, 350-(gid*2-2+infid)*25 ,To(gid*2-2+infid));                    hold on
                        end
                   end
   box on

             set(gcf,'papersize',[10 10],'paperposition',[0,0,10,10]);hold on;
                           saveas(gcf, strcat(pathTOsave, ...
                            '\EE99Theta', ...
                            '.eps'),'psc2');
                           saveas(gcf, strcat(pathTOsave, ...
                            '\EE99Theta.pdf'),'pdf');
       figure()
end