Skip to contents

Get nodes connected via bidirected edges in an ADMG.

Usage

spouses(cg, nodes = NULL, index = NULL)

Arguments

cg

A caugi object of class ADMG.

nodes

A vector of node names.

index

A vector of node indexes.

Value

Either a character vector of node names (if a single node is requested) or a list of character vectors (if multiple nodes are requested).

Examples

cg <- caugi(
  A %-->% B,
  A %<->% C,
  B %<->% C,
  class = "ADMG"
)
spouses(cg, "A") # "C"
#> [1] "C"
spouses(cg, "C") # c("A", "B")
#> [1] "A" "B"