tests/testthat/test-sentiment.R

context("sentiment")

test_that("'bad' is bad sentiment", {
  expect_equal(sentiment("bad"), "bad")
})

test_that("'love' is good sentiment", {
  expect_equal(sentiment("love"), "good")
})
mdneuzerling/ModelAsAPackage documentation built on Feb. 1, 2020, 12:57 a.m.