compute the list of inferred marginals of a BN.
marginals.RdGiven an InferenceEngine, it returns a list containing the marginals for the variables
in the network, according to the propagated beliefs.
Examples
if (FALSE) {
eng <- InferenceEngine(net)
marginals(eng)
}