# Import your data. For example:
data(SCHF)
# Get the parsimonious solution:
sol_yp <- minimize(SCHF, outcome = "EXPORT",
conditions = c("EMP","BARGAIN","UNI","OCCUP","STOCK", "MA"),
incl.cut = .9,
include = "?",
details = TRUE, show.cases = TRUE)
# Get the intermediate solution:
sol_yi <- minimize(SCHF, outcome = "EXPORT",
conditions = c("EMP","BARGAIN","UNI","OCCUP","STOCK", "MA"),
incl.cut = .9,
include = "?",
details = TRUE, show.cases = TRUE, dir.exp = c(0,0,0,0,0,0))
# Get the prime implicants table for the parsimonious solution:
pimdata(results = sol_yp, outcome = "EXPORT")
# Get the prime implicants table for the first intermediate solution:
pimdata(results = sol_yi, outcome = "EXPORT", sol = 1)
Run the code above in your browser using DataLab