Skip to contents

Convenience wrapper for filter_edges_by_role() keeping edges where both endpoints held a board seat – interlocking-directorate ties. mode = "any" (the default) counts a person who ever sat on that org's board; use mode = "primary" to require board to be their dominant role there.

Usage

board_only_edges(
  edges,
  profiles,
  mode = c("any", "all", "primary"),
  match = c("both", "either"),
  annotate = TRUE
)

Arguments

edges

Edge table with emp_a, emp_b (e.g. link_cross_org()$edges).

profiles

Profiles those ids index (build_person_profile()); needs roles and primary_role.

mode

How to reduce an endpoint's role set: "any", "all", "primary".

match

Require the endpoint test on "both" ends or "either".

annotate

Append roles_a, roles_b (the endpoints' role sets, +- joined) to the result for inspection.

Value

The board-interlock subset of edges.

Examples

if (FALSE)  board_only_edges(link_cross_org(linked)$edges, profiles)  # \dontrun{}