close all
clear all

figure(1) %----------------------------------------------------------------

lw = 2;
%fill([-3 xx 2], [0 yy 0], 'y')
%plot(x,y, 'k-','linewidth',3)
%set(gca,'XTick',[],'YTick',[])
%-----------------marker dots-----------------------------------------
plot([0 1],[0 0],'k-','linewidth',lw)
axis([0 5 -2 1.5])
hold on
plot([1 1],[-1 1],'k-','linewidth',lw)
plot([1 2.5],[-1 -1],'k-','linewidth',lw)
plot([1 4],[ 1 1],'k-','linewidth',lw)
plot([2.5  2.5],[-0.5 -1.5],'k-','linewidth',lw)
plot([3.5 3.5],[-0.5 -1.5],'k-','linewidth',lw)
plot([2.5 3.5],[-1.5 -1.5],'k-','linewidth',lw)
plot([2.5 3.5],[-0.5 -0.5],'k-','linewidth',lw)
plot([3.5 4],[-1 -1],'k-','linewidth',lw)
plot([4 4],[-1 1],'k-','linewidth',lw)
plot([4 5],[0 0],'k-','linewidth',lw)

ms=50; co = [.7 1 .63];
plot(0.5,0,'-ms', 'LineWidth',2,'MarkerEdgeColor','k',...
                'MarkerFaceColor',co,'MarkerSize',ms)      
            
plot(2, 1,'-ms', 'LineWidth',lw,'MarkerEdgeColor','k',...
                'MarkerFaceColor',co,'MarkerSize',ms)       
plot(3, 1,'-ms', 'LineWidth',lw,'MarkerEdgeColor','k',...
                'MarkerFaceColor',co,'MarkerSize',ms)       
plot(1.75,-1,'-ms', 'LineWidth',lw,'MarkerEdgeColor','k',...
                'MarkerFaceColor',co,'MarkerSize',ms)      
 %plot(3.5,1,'-ms', 'LineWidth',lw,'MarkerEdgeColor','k','MarkerFaceColor',[.7 1 .63],'MarkerSize',ms)      
  plot(4.5,0,'-ms', 'LineWidth',lw,'MarkerEdgeColor','k',...
                'MarkerFaceColor',co,'MarkerSize',ms)      
         
plot(3,-1.5,'-ms', 'LineWidth',lw,'MarkerEdgeColor','k',...
                'MarkerFaceColor',co,'MarkerSize',ms)       
plot(3, -0.5,'-ms', 'LineWidth',lw,'MarkerEdgeColor','k',...
                'MarkerFaceColor',co,'MarkerSize',ms)                 
            
%--------------------------------------------------------------------------
%text(0.05,0.03,'\fontsize{25} 0')
%text(-1.05,0.02,'\fontsize{25} \frac{a - \mu}{\sigma}')
%text(1.95,0.02,'\fontsize{25} \frac{b-\mu}{\sigma}')

% text('Interpreter','latex',...
% 	'String','$$0$$',...
% 	'Position',[0.15 .03],...
% 	'FontSize',25)
% text('Interpreter','latex',...
% 	'String','$$\frac{a - \mu}{\sigma}$$',...
% 	'Position',[-1.05 .04],...
% 	'FontSize',20)

% xw = 1.95:0.02:2.6; yw = normpdf(xw); %whiten!
% plot(xw, yw, 'w-', 'linewidth',4)
% 
m1 = 0.17; m2= 0.02;  %m1 and m2 are offsets for a nice look in EPS.
fs = 25;
 text('Interpreter','latex',	'String','$$E_1$$','Position',[0.5-m1 0-m2],'FontSize',fs)
 text('Interpreter','latex',	'String','$$E_2$$','Position',[2-m1 1-m2],'FontSize',fs)
 text('Interpreter','latex',	'String','$$E_3$$','Position',[3-m1 1-m2],'FontSize',fs) 
 text('Interpreter','latex',	'String','$$E_4$$','Position',[1.75-m1 -1-m2],'FontSize',fs)
 text('Interpreter','latex',	'String','$$E_5$$','Position',[3-m1 -0.5-m2],'FontSize',fs)
 text('Interpreter','latex',	'String','$$E_6$$','Position',[3-m1 -1.5-m2],'FontSize',fs)
 text('Interpreter','latex',	'String','$$E_7$$','Position',[4.5-m1 0-m2],'FontSize',fs)

%set(gca,'XTick',[],'YTick',[])
axis off
% % 
% text('Interpreter','latex',...
% 	'String','$$\Phi\left(\frac{b-\mu}{\sigma}\right)$$',...
% 	'Position',[-2.8 .34],...
% 	'FontSize',25)
% 
% 
% 

%print -depsc 'C:\STAT\Probs\Probseps\circ02.eps'
