Code of the function 't.test.ds' replace and R function 't.test' made available to client.