tests/testthat/test-tosr_load.R

test_that("create ToS correctly", {
  data("my_tosr_load")

  expect_equal(
    nrow(tosSAP(my_tosr_load$graph,
                my_tosr_load$df,
                my_tosr_load$nodes)),
    118
  )
})

Try the tosr package in your browser

Any scripts or data that you put into this service are public.

tosr documentation built on Aug. 9, 2023, 5:10 p.m.