tests/testthat/test.taxa.R

context("taxa")


test_that("correct info about class structure", {
  data = read.morphodata("../testFiles/sample.txt")

  expect_equal(paste(taxa(data), collapse = ","), "hybr,ph,ps,st")

})
MarekSlenker/MorphoTools2 documentation built on Oct. 2, 2024, 5:58 p.m.