cs_kelty
Messages postés3Date d'inscriptionlundi 6 novembre 2006StatutMembreDernière intervention 8 novembre 2006
-
6 nov. 2006 à 11:31
Gobillot
Messages postés3140Date d'inscriptionvendredi 14 mai 2004StatutMembreDernière intervention11 mars 2019
-
10 nov. 2006 à 01:14
je travail sur un TP qui a pour but, l'estimation de la simulation de variables aléatoires en excel,j'ai rencontrer quelques problemes, et je me demandais s'il n'y aurais pas des connaisseures en la matiere qui pourrais eventuellement m'aider, voilà?
Gobillot
Messages postés3140Date d'inscriptionvendredi 14 mai 2004StatutMembreDernière intervention11 mars 201934 7 nov. 2006 à 00:28
plus simple:
pour un lancement avec un dé il y a 1 chance sur 6 de faire un 6:
cas 1: probabilité = 1/6
pour un lancement avec deux dés, il y a 1 chance sur 36 de faire un double 6:
cas 2: probabilité = 1/36
soit un rapport de:
cas1 / cas 2 = 6
conclusion:
il faut 6 fois plus de tirage dans le deuxième cas:
cs_kelty
Messages postés3Date d'inscriptionlundi 6 novembre 2006StatutMembreDernière intervention 8 novembre 2006 6 nov. 2006 à 12:56
le probleme est de trouver la solution de l'exercice donné et de la remettre en excel, je vous propose un p'tit ennoncé: Qu'est ce qu'est plus probable: sortir au moins un 6 en lançant 4 fois un dé, ou sortir au moins un double 6 lançant 24 fois deux dés. Estimer avec simulation ces deux probabilites.
Dolphin Boy
Messages postés630Date d'inscriptionvendredi 5 mai 2006StatutMembreDernière intervention17 février 2007 6 nov. 2006 à 16:38
Salut, j'adore ce genre de topic !!!
Dis moi PCPT, je ne conteste pas tes résultats mais je pense que kelty (auteur du topic) espérait un algorythme.
D'autre part, dans tes calculs, prends-tu en compte la forme, la taille et la souplesse (ou dureté) de la piste dans laquelle on lance les dés ? Et prends-tu en compte aussi la force et le tour de main avec lesquels les dés sont lancés ? Sans parler des tricheries possibles ? Et d'autres considérations comme météo, altitude, pression atmosphérique, ...
Bon, OK, je sais bien qu'il ne s'agit en l'occurence que de tirages aléatoires simulés par ordinateur. Dans ce cas, ma réponse à kelty sera :
- voir l'instruction Randomize et la fonction Rnd()
PCPT
Messages postés13272Date d'inscriptionlundi 13 décembre 2004StatutMembreDernière intervention 3 février 201847 6 nov. 2006 à 18:01
malheureusement Dolphin Boy, il est possible que ces facteurs soient vraiment demandés, et qu'excel ne serve que de tableur ^^
pour l'algo..., une boucle jusque 1000, contenant une boucle de 4 et une boucle de 24, appelant cette fonction :
Function IsSix(iNbDices As Integer) As Boolean
Dim a%, b%
a% = Fix(Rnd * 6) + 1
If iNbDices = 1 Then
IsSix = (a = 6)
Else
b% = Fix(Rnd * 6) + 1
IsSix = ((a = 6) And (b = 6))
End If
End Function
par contre quelquechose me perturbe dans l'énoncé :
" l'estimation de la simulation de variables aléatoires en excel "
estimer des variables aléatoires, ok
estimer des simulations..., admettons
mais estimer des simulations de variables... c'est pas un peu comme si j'avais le dos qui me démangeait, et que je comptais le nombre de secondes avant d'être apaisé, suite à ma simulation de grattage?
étrange ^^
<hr size ="2" width="100%" />Prenez un instant pour répondre à ce sondage svp
Dolphin Boy
Messages postés630Date d'inscriptionvendredi 5 mai 2006StatutMembreDernière intervention17 février 2007 6 nov. 2006 à 19:44
HiHi PCPT ! On est d'accord et, tant que Kelty n'aura pas exprimé correctement sa demande, ce ne sera qu'un gratte-cul moderne. Bravo à toi PCPT d'accepter de te gratter sans savoir quoi te gratter.
Gobillot
Messages postés3140Date d'inscriptionvendredi 14 mai 2004StatutMembreDernière intervention11 mars 201934 9 nov. 2006 à 21:29
oui je sais c'est faux !!!!
je me suis rendu compte, pour 6 tirages j'arrive à une probabilité de 1, ce qui est impossible
faut enlever les cas communs
par exemple pour 2 tirages, c'est pas 12/6 mais 11/6
ça doit se calculer avec les combinaisons, mais j'ai pas trouvé comment
Gobillot
Messages postés3140Date d'inscriptionvendredi 14 mai 2004StatutMembreDernière intervention11 mars 201934 10 nov. 2006 à 01:14
correction des calculs:
4 lancer avec 1 dé:
6350 + 6251 + 6152 + 6053 --> 671 pour 1296 cas soit p = 0.517746913
24 lancer avec 2 dés:
3623350 + 3622351 + 3621352 + .... + 3603523
Dim n As Long
Dim z As Long
Dim i As Integer
Dim j As Integer
Dim a As Integer
Dim b As Integer
Dim x As Double
'calcul probabilité: 4 tirages avec 1 dé a 3: b 0
For i = 1 To 4
x = x + (6 ^ a) * (5 ^ b) a a - 1: b b + 1
Next
MsgBox x / (6 ^ 4)
'calcul probabilité: 24 tirages avec 2 dés a 23: b 0
For i = 1 To 24
x = x + (36 ^ a) * (35 ^ b) a a - 1: b b + 1
Next
MsgBox x / (36 ^ 24)
'verif probabilité: 4 tirages avec 1 dé
z = 0
For n = 1 To 100000
b = 0
For j = 1 To 4 If Int(Rnd * 6) 5 Then b 1
Next
z = z + b
Next
MsgBox z / 100000
'verif probabilité: 24 tirages avec 2 dés
z = 0
For n = 1 To 100000
b = 0
For j = 1 To 24 If Int(Rnd * 36) 35 Then b 1
Next
z = z + b
Next
MsgBox z / 100000