Created trans.tab function

This function computes the p-value for a TDT test using binom.test.