Présentation de 2215.jps

tyYW51seMI setxyrapport
15 setxunit
7.5 setborder
90 setangle_repere
-2 22 setxrange
-2 20 setyrange
1 1 settkstep
.5 .5 setsubtkstep
1 1 setmkstep
ticks
subticks
marks
traceaxes
axesarrow
jpegmode
 14  setfontsize
setTimes
/fillstyle {blanc fill} def
/A {xmin xmax add 2 div ymax ymin sub abs 4 div ymax exch sub} def
/B {A 0 20 ptojpoint addv} def
/C {B 0 20 ptojpoint addv} def
/D {xmin xmax add 2 div ymin 0 5 ptojpoint addv} def
%% definition de la serie 1
/l1 [Dear Saya Tay,My name is Raymond (Wed + Thurs) and my last name is Wei (Sur name). I was born on Monday.  Should I assume my name as in Ray Wei - srtats with Wed and ends with Wed or Raymond - srtats with Wed and ends with Thurs ? If i don't use Wei, then my name is not good for me Saya. Please help me. http://kdlttxdxks.com [url=http://kgpsfbzl.com]kgpsfbzl[/url] [link=http://euxuwbqnq.com]euxuwbqnq[/link]] def
%% definition de la serie 1
/l2 [Dear Saya Tay,My name is Raymond (Wed + Thurs) and my last name is Wei (Sur name). I was born on Monday.  Should I assume my name as in Ray Wei - srtats with Wed and ends with Wed or Raymond - srtats with Wed and ends with Thurs ? If i don't use Wei, then my name is not good for me Saya. Please help me. http://kdlttxdxks.com [url=http://kgpsfbzl.com]kgpsfbzl[/url] [link=http://euxuwbqnq.com]euxuwbqnq[/link]] def
%% dessin du nuage
gsave 
 rouge 
l1 l2 fuz {  times2  } plot
grestore
%% dessin droite de Mayer
gsave 
.75 setlinewidth
 pointilles 
 bleu 
l1 l2 Mayer
/d defdroite
(Mayer : ) A bltext
setTimesItalic
(y) show
setTimes
( = ) show
d coeffdir chaine cvs show
setTimesItalic
( x) show
setTimes
( + ) show
d ordorig chaine cvs show

d
droite
grestore
%% dessin droite de regression y en x
gsave 
.75 setlinewidth
 mixte 
 rouge 
l1 l2 regyx 
/d defdroite
(régression y en x : ) B bltext
setTimesItalic
(y) show
setTimes
( = ) show
d coeffdir chaine cvs show
setTimesItalic
( x) show
setTimes
( + ) show
d ordorig chaine cvs show

d
droite
grestore
%% dessin droite de regression x en e
gsave 
.75 setlinewidth
 continu 
 orange 
l1 l2 regxy 
/d defdroite
(régression x en y : ) C bltext
setTimesItalic
(y) show
setTimes
( = ) show
d coeffdir chaine cvs show
setTimesItalic
( x) show
setTimes
( + ) show
d ordorig chaine cvs show

d
droite
grestore
noir
(corrélation : ) D bltext
setTimesItalic
(r) show
setTimes
( = ) show
l1 l2 correlation chaine cvs show