Pertimbangkan grafik acak Erdos-Renyi . Himpunan simpul diberi label oleh . Himpunan tepi dibangun oleh proses acak.n V V = { 1 , 2 , … , n } E
Misalkan adalah probabilitas , maka masing-masing pasangan unordered dari simpul ( ) terjadi sebagai tepi dalam dengan probabilitas , terlepas dari pasangan lainnya.0 < p < 1 { i , j } i ≠ j E p
Segitiga dalam adalah triple unordered dari simpul yang berbeda, sehingga , , dan adalah tepi .{ i , j , k } { i , j } { j , k } { k , i } G
Jumlah maksimum dari kemungkinan segitiga adalah . Mendefinisikan variabel random menjadi hitungan diamati dari segitiga dalam grafik .
Probabilitas bahwa tiga tautan secara bersamaan hadir adalah . Oleh karena itu, nilai yang diharapkan dari diberikan oleh . Secara naif, orang mungkin menebak bahwa varians diberikan oleh , tetapi ini tidak terjadi.
Kode Mathematica berikut mensimulasikan masalah:
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]
Apa varian ?