-- Try AtCoder
-- author: Leonardone @ NEETSDKASU

main = putStrLn . solve . map read . tail . words =<< getContents

solve xs = if ans then "Yes" else "No" where
    (o, q, e) = foldl f (0, 0, 0) xs
    f (o, q, e) x | odd x        = (o + 1, q, e)
                  | mod x 4 == 0 = (o, q + 1, e)
                  | otherwise    = (o, q, e + 1)
    ans = (o == 0)
       || (q > 0 && e == 0 && q >= o - 1)
       || (q > 0 && e > 0 && q >= o)
    