Committing working(?) t-test function