inst/tinytest/test_coerce.R

Sys.setenv(LANGUAGE = "en") # Force locale

# Back transform to count ======================================================
data("hongite")
coda <- as_composition(hongite)
count <- as_amounts(coda)
expect_equal(as.data.frame(count), hongite)
tesselle/nexus documentation built on June 1, 2025, 9:04 p.m.