tests/testthat/test-smi.R

library(isnar)

context("Testing SMI")


test_that("SMI works", {
          g <- delete.edges(IBE121, E(IBE121)[ question != "play" ])
          smi(g, "female")
} )
mbojan/isnar documentation built on Feb. 18, 2021, 4:38 a.m.