test_that("diagram gets generated", { skip_if_not_installed("DiagrammeR") expect_no_error( diagram_lineage(pheno_set) ) expect_true( DiagrammeR::is_graph_simple(diagram_lineage(pheno_set)) ) })