inst/tests/test-get-metric.r

context("get metric")

test_that("get_metric works", {  
  expect_that(get_metric(NULL), is_true())
  expect_that(get_metric(c("ord", "ord")), is_false())
  expect_that(get_metric(c("num", "raw")), is_false())
})
gastonstat/plspm documentation built on April 8, 2022, 5:59 a.m.