Nothing
tests/testthat/test-bug-1033045.R
In igraph: Network Analysis and Visualization
test_that("Minimal s-t separators work", {
g <- graph_from_literal(a -- 1:3 -- 5 -- 2:4 -- b, 1 -- 2, 3 -- 4)
stsep <- min_st_separators(g)
ims <- sapply(stsep, is_min_separator, graph = g)
expect_that(ims, equals(rep(TRUE, 9)))
})
Try the igraph package in your browser
Any scripts or data that you put into this service are public.
igraph documentation built on Aug. 10, 2023, 9:08 a.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
test_that("Minimal s-t separators work", {
g <- graph_from_literal(a -- 1:3 -- 5 -- 2:4 -- b, 1 -- 2, 3 -- 4)
stsep <- min_st_separators(g)
ims <- sapply(stsep, is_min_separator, graph = g)
expect_that(ims, equals(rep(TRUE, 9)))
})
Try the igraph package in your browser
Any scripts or data that you put into this service are public.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.