Skip to contents

Applies Meek's orientation rules (R1–R4) repeatedly to a PDAG until no more orientations are implied.

Usage

meek_closure(cg)

Arguments

cg

A caugi object. Must be PDAG-compatible.

Value

A caugi object closed under Meek's rules. Class "MPDAG" in general, or "DAG" if the closure orients every edge.

References

C. Meek (1995). Causal inference and causal explanation with background knowledge. In Proceedings of the Eleventh Conference on Uncertainty in Artificial Intelligence (UAI-95), pp. 403–411. Morgan Kaufmann.

Examples

pdag <- caugi(
  A %---% B,
  A %-->% C,
  C %-->% B,
  class = "PDAG"
)
mpdag <- meek_closure(pdag)
edges(mpdag)
#>      from   edge     to
#>    <char> <char> <char>
#> 1:      A    -->      B
#> 2:      A    -->      C
#> 3:      C    -->      B