View source: R/permutation_test.R
| summary.net_permutation_group | R Documentation |
Returns a combined summary data frame across all groups.
## S3 method for class 'net_permutation_group'
summary(object, ...)
object |
A |
... |
Additional arguments (ignored). |
A data frame with group, edge, p_value, and sig columns.
s1 <- data.frame(V1 = c("A","B","A","C"), V2 = c("B","C","B","A"),
V3 = c("C","A","C","B"), grp = c("X","X","Y","Y"))
s2 <- data.frame(V1 = c("C","A","C","B"), V2 = c("A","B","A","C"),
V3 = c("B","C","B","A"), grp = c("X","X","Y","Y"))
nets1 <- build_network(s1, method = "relative", group = "grp")
nets2 <- build_network(s2, method = "relative", group = "grp")
perm <- permutation(nets1, nets2, iter = 10)
summary(perm)
set.seed(1)
s1 <- data.frame(V1 = c("A","B","A","C"), V2 = c("B","C","B","A"),
V3 = c("C","A","C","B"), grp = c("X","X","Y","Y"))
s2 <- data.frame(V1 = c("C","A","C","B"), V2 = c("A","B","A","C"),
V3 = c("B","C","B","A"), grp = c("X","X","Y","Y"))
nets1 <- build_network(s1, method = "relative", group = "grp")
nets2 <- build_network(s2, method = "relative", group = "grp")
perm <- permutation(nets1, nets2, iter = 20, seed = 1)
summary(perm)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.