isTRUE(all.equal(variationOfInformation(new("Partition", c(0, 0, 0, 1, 1)),
new("Partition", c(0, 0, 1, 1, 1))),
0.763817))
Run the code above in your browser using DataLab