judge as = if jsub as then "Yes" else "No"
jsub as
  | e == 0 = o<=q+1
  | otherwise = o<=q
  where 
    mods = map (flip mod 4) as
    q = length $ filter (==0) mods
    e = length $ filter (==2) mods
    o = length $ filter odd mods

main = getLine >> getLine >>= putStrLn . judge . map read . words