tests/testthat/testsgeneral.R

context("General tests for low level functions")

dist <- dpois(1:10,4)/sum(dpois(1:10,4))
expect_equal(A_to_X_dist(X_to_A_dist(dist)), dist)

Try the prevtoinc package in your browser

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

prevtoinc documentation built on June 18, 2019, 5:05 p.m.