Bonjour,
est-ce que quelqu'un a déjà réalisé des diagrammes de type "error bars" comme ceux faits ici ?
{ drawError( liste, erreurs <, color, fillcolor>) }
[
Ligne(%1, 0),
SaveAttr(), $ep:=0.125,
LineStyle:=solid,
Color:= (if %3=Nil then red else %3 fi),
FillColor:= (if %4=Nil then blue else %4 fi),
$k:=0,
Ligne(
for $z in %1 do
Inc(k,1), $d:=Copy(%2,k,1)/2,
$u1:=z-Re(d),$u2:=z+Re(d),$v1:=z-i*Im(d),$v2:=z+i*Im(d),
u1,u2,jump, v1,v2,jump,
if abs(v1-v2)>1E-10 then
v1-ep/Xscale, v1+ep/Xscale,jump,
v2-ep/Xscale, v2+ep/Xscale,jump
fi,
if abs(u1-u2)>1E-10 then
u1-i*ep/Yscale, u1+i*ep/Yscale,jump,
u2-i*ep/Yscale, u2+i*ep/Yscale,jump
fi
od, 0),
DotStyle:=dotcircle, Point(%1),
RestoreAttr()
]
[
view(0,100,0,45), size(9),
Color:=lightgray, Grille(0,10+5*i), Color:=black,
Axes(0,10+5*i, 1+i),
f:=[5+4*i, 40+10*i,50+20*i, 90+40*i],
df:=[0, 2, 5+7*i, 5*i],
drawError(f, df, red, blue)
]
Alphonse Capriani a écrit:Quand j'en aurait fini avec les pavages, je pense que je vais m'attaquer plus particulièrement à ce domaine...
P.Fradin a écrit:Si tu es d'accord on pourrait peut-être s'y mettre à deux sur ce projet, il est tellement vaste qu'il serait bon de définir d'abord une sorte de cahier des charges, avant de se répartir le boulot. Qu'en penses-tu?
Alphonse Capriani a écrit:Mais bien entendu, je reste quand même disponible si tu compte commencer le travail dès maintenant...
Utilisateurs parcourant ce forum : Aucun utilisateur inscrit et 5 invités