tests/testthat/test-babel.R

test_that("complex and cartesian work", {
  x <- coo_single(tibble::tibble(x=0.213, y=-9.2324))
  expect_equivalent(x, x %>% cartesian_2_complex() %>% complex_2_cartesian())
})
MomX/Momocs2 documentation built on May 13, 2020, 4:28 a.m.