tests/testthat/test-rcpp_distSTRING.R

In kullrich/distSTRING: distSTRING calculates pairwise distances between all sequences of a DNAStringSet or a AAStringSet using a custom score matrix and conducts codon based analysis

data(hiv)

test_that("rcpp_distSTRING()", {
    expect_true(rcpp_distSTRING(dnavector=as.character(hiv),
    scoreMatrix=iupacMatrix())$sitesUsed[1,2] == 273)
    expect_true(rcpp_distSTRING(dnavector=as.character(hiv),
    scoreMatrix=iupacMatrix(), ncores=2)$sitesUsed[1,2] == 273)
})