tests/valid_proportion.R

library(freedom)

stopifnot(!freedom:::valid_proportions(c(0.4, 0.3)))
stopifnot(freedom:::valid_proportions(c(0.7, 0.3)))
stopifnot(freedom:::valid_proportions(c(0.7, 0.2, 0.1)))
stopifnot(freedom:::valid_proportions(1))
stopifnot(!freedom:::valid_proportions(-1))
stopifnot(!freedom:::valid_proportions(2))
SVA-SE/freedom documentation built on Feb. 1, 2023, 5:50 p.m.