tests/testthat/test-cosine_similarity.R
In beamandrew/cui2vec: cui2vec Word Embeddings for Multimodal Data
context("Cosine similarity")
library(cui2vec)
test_that("cosine_similarity is correct", {
expect_equal(cosine_similarity(c(1,1), c(1,1)), 1.0)
expect_equal(cosine_similarity(c(1,1), c(-1,-1)), -1.0)
expect_equal(cosine_similarity(c(1,0), c(0,1)), 0.0)
})
beamandrew/cui2vec documentation built on Nov. 4, 2019, 7:07 a.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.
context("Cosine similarity")
library(cui2vec)
test_that("cosine_similarity is correct", {
expect_equal(cosine_similarity(c(1,1), c(1,1)), 1.0)
expect_equal(cosine_similarity(c(1,1), c(-1,-1)), -1.0)
expect_equal(cosine_similarity(c(1,0), c(0,1)), 0.0)
})
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.