Verify if the input data are consolidate, i.e., if there are events with 0 or 1 probability or indistinguishable in terms of observations
consolidate.data(x, print = FALSE)
The list of any 0 probability, 1 probability and indistinguishable.
data(test_dataset)
consolidate.data(test_dataset)
#> $indistinguishable
#> list()
#>
#> $zeroes
#> list()
#>
#> $ones
#> list()
#>