adj <- matrix(c(0, 1, 1, 0), 2, 2)
rownames(adj) <- colnames(adj) <- c("A", "B")
get_labels(rename_nodes(adj, from = "A", to = "Alpha"))
get_labels(rename_nodes(adj, from = c(A = "Alpha", B = "Beta")))
Run the code above in your browser using DataLab