tests/testthat/test_yoga.R

In VedicDateTime: Vedic Calendar System

library(testthat)
library(VedicDateTime)
source_test_helpers()

test_that("Check positive testcase", {
  expect_equal(yoga(vd$jd, vd$place), c(5,27,26,14), tolerance = .Machine$double.eps^0.2)
})
test_that("Check positive testcase", {
  expect_equal(yoga(vd$jd, vd$place), c(5,27,26,14), tolerance = .Machine$double.eps^0.2)
})