Logical Operator In R Language