main = do
  [x, y] <- map read . words <$> getLine :: IO [Float]
  let kame = - x + y/2
  let tsuru = x - kame
  putStrLn $ if (round y) `mod` 2 == 0
     then if  kame >= 0 && tsuru >= 0
             then "Yes"
             else "No"
     else "No"
