Bonjour, je sollicite votre savoir et avis.
Les données ci-dessous correspondes à des probabilités sur un match de foot "championShip", obtenu en langage R.
1) - Le tableau rouge ligne1 et Colonne A score de 0à7+, le contenu est le pourcentage de Proba.
2) - Proba texte bleu : Pourcentage à domicile, % Nul, %exterieur.
3) - Proba texte jaune : score du match basé sur attaque - défense.
Voila pour la petite explication, l'idée serait de combiner les trois probas pour avoir le résultat sous forme de :
1Victoire
2Nul
3Defaite
Est ce possible d'abord ?
> lambdaMil<- exp(0 - (0.0854836340) +-0.038342489)
> lambdaCry<- exp( 0.282640525-(0.0947121239))
> Probabilities <- ProbTable(TeamParameters,"Millwall","Crystal_Palace")
> Probabilities
0 1 2 3 4 5 6 7+
0 6.26 8.22 5.39 2.36 0.77 0.20 0.04 0.01
1 9.13 11.98 7.87 3.44 1.13 0.30 0.06 0.01
2 6.65 8.74 5.74 2.51 0.82 0.22 0.05 0.01
3 3.24 4.25 2.79 1.22 0.40 0.11 0.02 0.01
4 1.18 1.55 1.02 0.44 0.15 0.04 0.01 0.00
5 0.34 0.45 0.30 0.13 0.04 0.01 0.00 0.00
6 0.08 0.11 0.07 0.03 0.01 0.00 0.00 0.00
7+ 0.02 0.03 0.02 0.01 0.00 0.00 0.00 0.00> ResultProbabilities <- ResultProbs(Probabilities)
> ResultProbabilities
$HomeWin
[1] 34
$Draw
[1] 25.36
$AwayWin
[1] 40.63
> Millwall <- rpois(1,lambdaMil)
> Crystal_Palace <- rpois(1,lambdaCry)
> Millwall
[1] 2
> Crystal_Palace
[1] 2
>
en vous remerciant
Les données ci-dessous correspondes à des probabilités sur un match de foot "championShip", obtenu en langage R.
1) - Le tableau rouge ligne1 et Colonne A score de 0à7+, le contenu est le pourcentage de Proba.
2) - Proba texte bleu : Pourcentage à domicile, % Nul, %exterieur.
3) - Proba texte jaune : score du match basé sur attaque - défense.
Voila pour la petite explication, l'idée serait de combiner les trois probas pour avoir le résultat sous forme de :
1Victoire
2Nul
3Defaite
Est ce possible d'abord ?
> lambdaMil<- exp(0 - (0.0854836340) +-0.038342489)
> lambdaCry<- exp( 0.282640525-(0.0947121239))
> Probabilities <- ProbTable(TeamParameters,"Millwall","Crystal_Palace")
> Probabilities
0 1 2 3 4 5 6 7+
0 6.26 8.22 5.39 2.36 0.77 0.20 0.04 0.01
1 9.13 11.98 7.87 3.44 1.13 0.30 0.06 0.01
2 6.65 8.74 5.74 2.51 0.82 0.22 0.05 0.01
3 3.24 4.25 2.79 1.22 0.40 0.11 0.02 0.01
4 1.18 1.55 1.02 0.44 0.15 0.04 0.01 0.00
5 0.34 0.45 0.30 0.13 0.04 0.01 0.00 0.00
6 0.08 0.11 0.07 0.03 0.01 0.00 0.00 0.00
7+ 0.02 0.03 0.02 0.01 0.00 0.00 0.00 0.00> ResultProbabilities <- ResultProbs(Probabilities)
> ResultProbabilities
$HomeWin
[1] 34
$Draw
[1] 25.36
$AwayWin
[1] 40.63
> Millwall <- rpois(1,lambdaMil)
> Crystal_Palace <- rpois(1,lambdaCry)
> Millwall
[1] 2
> Crystal_Palace
[1] 2
>
en vous remerciant