dwww Home | Show directory contents | Find package

context("layout_with_sugiyama")

test_that("layout_with_sugiyama does not demote matrices to vectors in res$layout.dummy", {
    ex <- graph.formula( A -+ B:C, B -+ C:D)
    layex <- layout.sugiyama(ex, layers=NULL)
    expect_that(nrow(layex$layout.dummy), equals(1))
})

Generated by dwww version 1.15 on Sun Jun 16 14:53:02 CEST 2024.