library(BioCompToolsR)
context("sampler statistics")
test_that("Fst OF testing", {
expect_equal(FstOF( t(matrix(c(0.5,0.5))), c(0.5,0.5) ), 0.0)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.