Returns the extreme points of a credal set
extPoints(x)
a credal set
a matrix where the extreme points are stored by row
# NOT RUN {
# state space
stateSpace <- c("a", "b", "c")
# construct credal set
c <- credal(c(0.1, 0.1, 0.1), c(0.8, 0.8, 0.8), stateSpace)
# obtain extrem points
eMat <- extPoints(c)
# }
Run the code above in your browser using DataLab