d=(3+3+3)/(5+7+9)


test_that("BrayCurtisDissimilarity", {
  expect_equal(BrayCurtisDissimilarity(c(1,2,3), c(4,5,6)), d,tolerance=1e-6)
})