Directional hypothesis in R