chart <- demoChart(c("A", "B", "c"), c("ABC", "Abc", "AbC", "aBc"))
prettyTable(chart)
# Quine's example, page 528
rows <- c("AB", "BC", "Ac", "aC", "abd", "bcd")
cols <- c("ABCD", "ABCd", "ABcD", "ABcd", "AbcD", "Abcd",
"aBCD", "aBCd", "abCD", "abCd", "abcd")
chart <- demoChart(rows, cols)
prettyTable(chart)
Run the code above in your browser using DataLab