EvCombR (version 0.1-4)

upper: Upper Bounds Based on Evidence Structure

Description

Calculate the upper bounds for a vector of sets

Usage

upper(x, sets)

Arguments

x

credal set or mass function

sets

vector of sets where each set is represented by state names separated by "/". If sets are missing, upper bounds on singletons are calculated.

Value

upper bound of mass or probability for each set in the vector sets or if sets is missing upper bounds on singletons

References

Shafer, G., (1976), A mathematical theory of evidence, Princeton University Press

Walley, P. (2000), Towards a unified theory of imprecise probability, International Journal of Approximate Reasoning, 24, 125-148

See Also

upper

Examples

# NOT RUN {
# state space
stateSpace <- c("a", "b", "c")

# mass function
m <- mass(list("a"=0.1, "b"=0.1 , 
               "c"=0.4, "a/b/c"=0.4), stateSpace)

# credal set
c <- credal(c(0.1, 0.1, 0.1), 
            c(0.8, 0.8, 0.8), stateSpace)

# calculate upper bounds
upper(m, c("a", "a/b"))
upper(c, c("a", "a/b")) 

# upper bounds on singletons
upper(m)

# }