/usr/share/doc/r-cran-phangorn/tests/testthat/test_Clanistics.R is in r-cran-phangorn 2.4.0-1.
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 13 | context("Clanistics")
tree <- rtree(10)
x <- simSeq(tree, l=5, type="USER", levels = c("red", "violet", "blue"))
test_that("clanistics works properly", {
# skip_on_cran()
expect_is(getClans(tree), "matrix")
expect_is(getClips(tree), "matrix")
expect_is(getSlices(tree), "matrix")
expect_is(getDiversity(tree, x), "clanistics")
expect_is(getDiversity(tree, x), "data.frame")
})
|