If Statement Two Conditions R