test_that("layout_dynamic works", { library(igraph) expect_error(layout_as_dynamic(3)) expect_error(layout_as_dynamic(list(igraph::graph.full(3),igraph::graph.full(5)))) expect_is(layout_as_dynamic(list(igraph::graph.full(5),igraph::graph.full(5))),"list") expect_no_error(layout_as_dynamic(list(igraph::graph.full(3)))) expect_error(layout_as_dynamic(igraph::graph.full(3))) })