% TeXgraph version 1.95-beta-1 % Fenetre Xmin Xmax Ymin Ymax Xscale Yscale 100#-1#4#14#30#1.6#0.5## % Marges gauche droite haut bas cadre gestion_couleur comptgraph 101#0.5#0.5#0.5#0.5#0#1#1## % Affectation des Variables theta et phi et type de perspective 18##[theta:=0.5236, phi:=1.0472,OriginalCoord(1),IdMatrix(),IdMatrix3D(), ModelView(ortho)]## % Déclaration des Macros 16#moustache#{ moustache( serie1, serie2, ... )} [$L:=Args(), $m:=min(L), $M:=max(L), $x1:=-1, $x2:=Nargs()+1, $y1:= Ent(m)-1, $y2:=Ent(M)+1, view(x1,x2,y1,y2), size(9,0), Arrows:=1, axeY([i*y1,1], (y2-y1)/10, 2), Arrows:=0, $X:=0, for $k from 1 to Nargs() do L:=Args(k), $N:=Nops(L), Sort(L), Inc(X,1), $m:=L[1], $x:=Ent(N/4+0.75), q1:=L[x], $x:=N/2, if Ent(x)