/usr/share/doc/r-cran-igraph/tests/testthat/test_minimal.st.separators.R is in r-cran-igraph 1.1.2-2ubuntu3.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 | context("min_st_separators")
test_that("min_st_separators works", {
library(igraph)
g <- make_graph("Zachary")
msts <- min_st_separators(g)
is <- sapply(msts, is_separator, graph=g)
expect_that(unique(is), equals(TRUE))
## TODO: check that it is minimal
})
|