Make node node table
make_node_node_table_(.data, node, link)
.data | a data frame with one row per node, link |
---|---|
node | name of the node variable |
link | name of the link variable |
a data frame with one row per link (node, node)
library("tibble") toy_data <- tibble::tibble( node = c("A", "B", "C", "A", "B"), link = c("a", "a", "b", "b", "b") ) make_node_node_table_( .data = toy_data, node = "node", link = "link" )#> node_A node_B #> 1 A B #> 2 A C #> 3 A B #> 4 B A #> 5 B C #> 6 B A #> 7 C A #> 8 C B