Considérons un graphe aléatoire Erdos-Renyi . L'ensemble des sommets est étiqueté par . L'ensemble des arêtes est construit par un processus aléatoire.
Soit une probabilité , puis chaque paire non ordonnée de sommets ( ) se présente comme une arête dans de probabilité , indépendamment des autres paires.
Un triangle en est un triple non ordonné de sommets distincts, tels que , et \ {k, i \} sont des arêtes dans G .
Le nombre maximum de triangles possibles est . Définir la variable aléatoire comme le nombre observé de triangles dans le graphe .
La probabilité que trois liens soient simultanément présents est . Par conséquent, la valeur attendue de est donnée par . Naïvement, on peut deviner que la variance est donnée par , mais ce n'est pas le cas.
Le code Mathematica suivant simule le problème:
n=50;
p=0.6;
t=100;
myCounts=Table[Length[FindCycle[RandomGraph[BernoulliGraphDistribution[n,p]],3,All]],{tt,1,t}];
N[Mean[myCounts]] // 4216. > similar to expected mean
Binomial[n,3]p^3 // 4233.6
N[StandardDeviation[myCounts]] // 262.078 > not similar to "expected" std
Sqrt[Binomial[n,3](p^3)(1-p^3)] // 57.612
Histogram[myCounts]
Quelle est la variance de ?