# a simple PI chart, formatted using internal function prettyTable()
PIs <- c("A", "B", "c") # the prime implicants
FPs <- c("ABC", "Abc", "AbC", "aBc") # the fundamental products
chart <- demoChart(PIs, FPs)
prettyTable(chart)
# example from Quine (1952, p.528)
PIs <- c("AB", "BC", "Ac", "aC", "abd", "bcd")
FPs <- c("ABCD", "ABCd", "ABcD", "ABcd", "AbcD", "Abcd",
"aBCD", "aBCd", "abCD", "abCd", "abcd")
chart <- demoChart(PIs, FPs)
prettyTable(chart)
Run the code above in your browser using DataLab