tests/testthat/test-ploidy.R
In dyerlab/gstudio: Tools Related to the Spatial Analysis of Genetic Marker Data
context("ploidy.R")
test_that("test", {
Z <- locus()
A <- locus( "A" )
AA <- locus( c("A","A") )
AAA <- locus( rep("A",3))
expect_that( ploidy(Z), equals(0) )
expect_that( ploidy(A), equals(1) )
expect_that( ploidy(AA), equals(2) )
expect_that( ploidy(AAA), equals(3) )
}
)
dyerlab/gstudio documentation built on Feb. 2, 2024, 8:24 p.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.
context("ploidy.R")
test_that("test", {
Z <- locus()
A <- locus( "A" )
AA <- locus( c("A","A") )
AAA <- locus( rep("A",3))
expect_that( ploidy(Z), equals(0) )
expect_that( ploidy(A), equals(1) )
expect_that( ploidy(AA), equals(2) )
expect_that( ploidy(AAA), equals(3) )
}
)
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.