View source: R/link_prediction.R
| evaluate_links | R Documentation |
Computes AUC-ROC, precision@k, and average precision for link
predictions against a set of known true edges.
evaluate_links(pred, true_edges, k = c(5L, 10L, 20L))
pred |
A |
true_edges |
A data frame with columns |
k |
Integer vector. Values of k for precision |
A data frame with columns: method, auc, average_precision, and one precision_at_k column per k value.
set.seed(42)
seqs <- data.frame(
V1 = sample(LETTERS[1:5], 50, TRUE),
V2 = sample(LETTERS[1:5], 50, TRUE),
V3 = sample(LETTERS[1:5], 50, TRUE)
)
net <- build_network(seqs, method = "relative")
pred <- predict_links(net, exclude_existing = FALSE)
# Evaluate: predict the network's own edges
true <- data.frame(from = pred$predictions$from[1:5],
to = pred$predictions$to[1:5])
evaluate_links(pred, true)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.