Update simpleTable.r

ok broke down and made a method to handle categorical / numeric / booleans differently. Little longer, but actually easier to read.