Nothing
tests/testthat/test-rghype.R
In ghypernet: Fit and Simulate Generalised Hypergeometric Ensembles of Graphs
test_that("rghype returns an error if all odds are zeros", {
adj <- matrix(c(0,4,0,2,0,1,3,0,0),3,3)
fit <- scm(adj,T,T)
fit$omega <- fit$omega * 0
expect_error(rghype(10, fit))
})
Try the ghypernet package in your browser
Any scripts or data that you put into this service are public.
ghypernet documentation built on Feb. 5, 2026, 1:08 a.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
test_that("rghype returns an error if all odds are zeros", {
adj <- matrix(c(0,4,0,2,0,1,3,0,0),3,3)
fit <- scm(adj,T,T)
fit$omega <- fit$omega * 0
expect_error(rghype(10, fit))
})
Try the ghypernet package in your browser
Any scripts or data that you put into this service are public.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.