tests/testthat/test-dRMSD.R
In Shaziya2020/SOMMD_11721: What the Package Does (One Line, Title Case)
test_that("dRMSD Calculates distance root-mean-square deviation", {
vec1 <- as.vector( c(1 , 2 , 3 , 4 , 5))
vec2 <- as.vector(c (5 , 4 , 3 , 2 , 1))
test_drmsd <- sqrt((1/ (5 * 4)) * sum((vec1 - vec2) ^ 2) )
expect_equal(dRMSD(vec1 , vec2 , 5) , test_drmsd)
})
Shaziya2020/SOMMD_11721 documentation built on Dec. 18, 2021, 1:06 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.
test_that("dRMSD Calculates distance root-mean-square deviation", {
vec1 <- as.vector( c(1 , 2 , 3 , 4 , 5))
vec2 <- as.vector(c (5 , 4 , 3 , 2 , 1))
test_drmsd <- sqrt((1/ (5 * 4)) * sum((vec1 - vec2) ^ 2) )
expect_equal(dRMSD(vec1 , vec2 , 5) , test_drmsd)
})
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.