tests/testthat/test_compositional.R

context("compositionality")

test_that("Compositionality tests are correct", {

  data(dietswap)
  pseq <- dietswap
  expect_false(is_compositional(pseq))  
  expect_true(is_compositional(transform(pseq, "compositional")))

  
})

Try the microbiome package in your browser

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

microbiome documentation built on Nov. 8, 2020, 5:08 p.m.