import Data.List
import qualified Data.ByteString.Char8 as B
import Control.Monad

main :: IO ()
main = breads >>= main'
    where
        main' [h, w] = replicateM h getLine >>= putStrLn . solve h w . concat

solve :: Int -> Int -> String -> String
solve h w = check . foldl' ff (0, 0, 0) . group . sort
    where
        ff (acc3, acc2, acc1) g
            | n `mod` 4 == 1 = (acc3, acc2, acc1 + 1)
            | n `mod` 4 == 2 = (acc3, acc2 + 1, acc1)
            | n `mod` 4 == 3 = (acc3 + 1, acc2, acc1)
            | otherwise = (acc3, acc2, acc1)
            where
                n = length g

        check (acc3, acc2, acc1)
            | (h == 1 || w == 1) && acc3 + acc1 == 1 = "Yes"
            | (even h && even w && acc3 == 0 && acc2 == 0 && acc1 == 0) || (even h && odd w && acc3 == 0 && acc1 == 0 && acc2 <= h) || (odd h && even w && acc3 == 0 && acc1 == 0 && acc2 <= w) = "Yes"
            | (odd h && odd w && (acc3 + acc1 == 2) && acc2 <= w + h - 2) = "Yes"
            | otherwise = "No"

breads :: IO [Int]
breads = unfoldr uff <$> B.getLine
    where
        uff b = check <$> B.readInt b
        check (a, b)
            | B.null b = (a, b)
            | otherwise = (a, B.tail b)
