tests/testthat/test-dirichlet.R

set.seed(123)

# x <- rdirichlet(10, matrix(rep(1,3), 10, 3))
# 
# test_that("ddirichlet works with different input types", {
#   expect_equal(rprobdist(0), numeric(0))
#   
# })

Try the rje package in your browser

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

rje documentation built on Nov. 12, 2022, 9:06 a.m.