Fichier 587.jps — Modifié le 27 Janvier 2008 à 10 h 20
%% auteur :
%% on veut obtenir une Bouding Box de 0 0 842 576 (format A4r)
28.4527 setxunit %% 10 mm
-.700 10.500 setyrange
-.700 13.500 setxrange
10 setborder
[5 5] {orange} Quadrillage
-1 10 setyrange
-1 13 setxrange
[1 1 .5 .5 .1 .1] {orange} Quadrillage
traceaxes
1 setymkstep
ymarks
xticks
axeOyarrow
[ 1 2 3 4 5 6 7 8 9 10 11 12]
[ 9 9 7 8 5 2 0 1 1 2 6 7]
/T {6.5 9} def
/J {1 0} def
/F {2 0} def
/M {3 0} def
/A {4 0} def
/m {5 0} def
/j {6 0} def
/L {7 0} def
/u {8 0} def
/S {9 0} def
/O {10 0} def
/N {11 0} def
/D {12 0} def
/K {-0.2 5} def
setTimesBold
boxit
(Nombre de jours de pluie mois par mois) T uctext
(Jours de pluie) K {90} ultext
(Jan) J dctext
(F?v) F dctext
(Mar) M dctext
(Avr) A dctext
(Mai) m dctext
(Juin) j dctext
(Jui) L dctext
(Aou) u dctext
(Sept) S dctext
(Oct) O dctext
(Nov) N dctext
(Dec) D dctext
fuz
dup {times2} plot
bleu ligne