main :: IO ()
main = do
    [x, y] <- map read . words <$> getLine :: IO [Int]
    if solve x y then putStrLn "Yes"
                 else putStrLn "No"

solve :: Int -> Int -> Bool
solve x y = 2 * x <= y && y <= 4 * x && even y