重み付きのボールを使って壷のモデルを可視化する
壷に重さ1の赤いボール10個と，重さ2の青いボール15個が入っている．12個のボールを他とは無関係に取り出したとき，赤いボールと青いボールのどちらを取り出すかの確率は，その重さに依存する．取り出された赤いボールの数はFisherHypergeometricDistributionに従う．赤と青のグラフは，この状況の20回のシミュレーションを表す．
𝒟 = Block[{m1 = 10, m2 = 15, n = 12, w1 = 1, w2 = 2}, FisherHypergeometricDistribution[n, m1, m1 + m2, w1 / w2]];sample = RandomVariate[𝒟, 20];DiscretePlot[PDF[𝒟, x], {x, 0, 12}, PlotStyle -> Hue[.4, .9, .6], BaseStyle -> {FontFamily -> "Verdana"}, PlotLabel -> 𝒟, ExtentSize -> 2 / 3, ImageSize -> 400, Epilog -> Inset[BarChart[Transpose[{sample, 12 - sample}], ChartLayout -> "Stacked", Ticks -> {False, True}, ChartStyle -> {Lighter[Red, 0.5], Lighter[Blue, 0.5]}, ImageSize -> 200], {Right, 0.3}, {Right, Top}]]