tests/testthat/test_area.R

library(elipsetraining)

context("Perimeter")

test_that("perimeter of a circle", {
  expect_equal(ellipse_area(1,1), pi * 1^2 * sqrt(1 - 1^2))
})
acdewinter/ellipseCalculator documentation built on May 13, 2019, 11:52 p.m.