tests/testthat/test-PolarDerivative.R

test_that("PolarDerivative works", {
  expect_equal(PolarDerivative(c(1/sqrt(2),1/sqrt(2))),
               matrix(c(1/sqrt(2),-1/sqrt(2)),nrow=1,ncol=2))
})

Try the KEPTED package in your browser

Any scripts or data that you put into this service are public.

KEPTED documentation built on May 29, 2024, 12:05 p.m.