tests/testthat/test-findRotation.R

context("findRotation")

test_that("Results are expected", {
  expect_equal(findRotation(0,0,1,-1), 45)
  expect_equal(findRotation(0,2,0,0), 90)
  expect_equal(findRotation(0,0,0,2), 270)
})
ecology-rocks/disperseR documentation built on May 15, 2019, 7:58 p.m.