tests/testthat/test_cosine.R

library(epilepsyontologysimilarities)
context("test_cosine")

test_that("Test cosine if it calculates the correct cosine coefficient", {
  expect_that(cosine(1,2,3), equals(1 - 0.4082483))
})
ZBMEDLABS/epilepsyontologysimilarities documentation built on Aug. 23, 2019, 1:18 p.m.