tests/testthat/test_tweets.R

context("Testing tweets.R function")

test_that('data types, dimension of test data', {
  expect_is(tweets,'data.frame')
  expect_equal(nrow(tweets), 1820)
  expect_equal(ncol(tweets), 2)
})
MAnalytics/opitools documentation built on March 21, 2023, 11:50 p.m.