%% reglage du format de l'image
600 setwidth
300 setheight

%% taille de la fenetre
-1 19 setxrange
-1 9 setyrange

%% trace du repere
traceaxes

/f {0 7 14 0} def

/g {0 8 14 1} def

/h {0 6 14 -1} def
/fillstyle {2 setgray fill} def
/xplus [8 1 3 12 14 17 7] def
/yplus [4 8 7  5 3 5 8] def
/xmoins [6 1 10 4 3] def
/ymoins [3 5 0.5 3 2] def
/u1 {8 4} def
/u2 {7.6 3.2} def
/u3 {6 3} def
/u4 {6.4 3.8} def
/u5 {14 0} def
/u6 {15 2}def

/dotsize 10 def
xplus yplus fuz {point} plot
xmoins ymoins fuz {square} plot
1 0 0 setrgbcolor
f droite		   %% on trace la droite de regression
[u5 u6] (->) ligne
pointilles
g droite
h droite
[u1 u2] (<->) ligne
[u3 u4] (<->) ligne

0 0 0 setrgbcolor
#tex# $w$
u6 uctexlabel