Fixed issue with incorrect answer of Q2. Updated na.rm = T