suivant: Analyse des résultats
monter: Déplacement dans deux directions
précédent: Simulation d'un parcours
Table des matières
Index
On note XA le tableau des résultats selon les abscisses.
On remarquera qu'ici Y ne sert à rien puisqu'on peut repérer le
point d'arrivée seulement à l'aide de son abscisse, elle permet juste de
visualiser le point d'arrivée.
On écrit :
parcoursim2(n) :={
local X,Y,r,j,k,XA;
XA:=[0,0,0,0,0,0];
for (j:=1;j<n+1;j++){
r:=rand(2);
X:=0;
Y:=0;
for (k:=1;k<6;k++){
if (r==1){
X:=X+1;
} else {
Y:=Y+1;
}
r:=rand(2);
}
XA[X]:=XA[X]+1;
}
switch_axes(NULL);
ClrGraph();
xyztrange(-0.5,5.2,-0.1,16.0,-10.0,10.0,-10.0,-10.0,
-0.5,5.2,-0.1,16.0,1);
return([XA,segment(0,i*XA[0]),segment(1,1+i*XA[1]),
segment(2,2+i*XA[2]),segment(3,3+i*XA[3]),
segment(4,4+i*XA[4]),segment(5,5+i*XA[5])]);
};
Voici les résultats obtenus :
pour parcoursim2(30) on a trouvé :
XA=[0,4,9,9,7,1]
pour parcoursim2(300) on a trouvé :
XA=[6,48,91,99,46,10]
pour parcoursim2(1000) on a trouvé :
XA=[26,170,313,320,148,23]
pour parcoursim2(10000) on a trouvé :
XA=[290,1498,3207,3128,1572,305]
Attention
Ici parcoursim2 renvoie une liste de segments : ces segments seront
donc dessinés dans un écran de géométrie et dans l'écran DispG.
Il faut donc écrire ClrGraph() en début de
programme si on veut effacer l'écran de géométrie DispG.
Documentation de giac écrite par Renée De Graeve