test_that("over_waves works", {
  res <- over_waves(manynet::fict_potter, netrics::net_by_components)
  # expect_equal(unname(unlist(c(res))), c(48,52,57,43,54,64))
})

test_that("over_membership works", {
  res <- over_membership(fict_potter, netrics::net_by_assortativity, 
                         membership = netrics::node_in_regular(fict_potter))
  expect_equal(unname(unlist(c(res))), c(0.490201713,NaN))
})