I want to know the vertex connectivity of a random graph on (say) 4 vertices. I can get the vertex connectivity of each of the 11 graphs on 4 vertices with this:
Table[GraphData[{4, k}, "VertexConnectivity"], {k, 1, 11}] If we label these 11 graphs we have 64 labeled graphs. In particular, the two unlabeled graphs with connectivity 2 have 3 + 6 = 9 labelings. I was expecting the vertex connectivity of 2 to appear with probability 9/64 in:
Table[VertexConnectivity[RandomGraph[BernoulliGraphDistribution[4, 0.5]]], {1000}] However, I do not obtain this probability form the above calculation. I am using Mathematica 9.0.
Count[Table[ VertexConnectivity[ RandomGraph[BernoulliGraphDistribution[4, 0.5]]], {10000}], 2]/10000.returned0.14. In v9 I get 0. v9 is definitely buggy. $\endgroup$