Using R, download option prices of ticker VIX for all expiration dates and name it "VIX"

a) Download the current price (last quote price) for VIX

b) For calls and puts at each expiration, add a column of "Price", which is the average of "Bid" and "Ask"

c) For calls and puts at each expiration, add a column of "moneyness", which takes value TRUE when it is out-of-money, and FALSE otherwise. (A call option is out-of-money when its strike is greater than current price of underlying. A put option is out-of-money if its strike is less than current price of underlying. And the current price of underlying is from the second question)

I have been able to get through a and b, but keep getting errors for c. I have fried different types of loops and vectorized operations, but still cant get it.