1.4. Code for the right tailed mean test