toInt :: String -> Int
toInt = read :: String -> Int

existsCraneAndTurtleCombination :: Int -> Int -> Bool
existsCraneAndTurtleCombination x y = length [(a, b) | a <- [0..x], b <- [0..x], 2*a + 4*b == y] > 0

main = do
  [x, y] <- map toInt . words <$> getLine
  putStrLn $ if existsCraneAndTurtleCombination x y then "Yes" else "No"
