New in Wolfram Mathematica 7: Industrial-Strength Boolean Computation  previous | next 
Visualize Truth Tables for Boolean Functions
Plot the matrix truth table for several Boolean counting functions.
In[1]:=

Click for copyable input
Partition[

  Table[ArrayPlot[

    BooleanTable[BooleanCountingFunction[{i}, 14] @@ Array[x, 14], 

     Array[x, 7], Array[x, 7, 8]], 

    ColorRules -> {False -> None, 

      True -> ColorData["Rainbow"][i/12]}], {i, 1, 12}], 

  4] // GraphicsGrid
Out[1]=