in reply to Re^2: Fisher's Exact Test
in thread Fisher's Exact Test

I think it is wrong. $ts means two-side, not one-side.