%% auteur : 

30 setfontsize
setTimes
20 setxyrapport
120 setxunit
7.5 setborder
90 setangle_repere
-0.9 7.3 setxrange
-3 105 setyrange
/quadrillagegray 0.4 def
1 setquadrillagexstep
20 setquadrillageystep
quadrillage
1 20 settkstep
0.1 2 setsubtkstep
1 10 setmkstep
ticks
subticks
marks
traceaxes
%% definition de la serie 1
/l1 [0 1 2 3 4 5 6 7 
] def
%% definition de la serie 1
/l2 [0 9 24 43 69 83 93 100
] def
%% dessin du nuage
gsave 
bleu
l1 l2 fuz { circ2 } plot
grestore
[0 0 1 9 2 24 3 43 4 69 5 83 6 93 7 100 ] ligne