tests/testthat/test_cosine.R

library(epos)
context("test_cosine")

test_that("Test cosine if it calculates the correct cosine coefficient", {
  expect_that(cosine(1,2,3), equals(1 - 0.4082483))
})

Try the epos package in your browser

Any scripts or data that you put into this service are public.

epos documentation built on Feb. 20, 2021, 9:09 a.m.