(let* ((n (read))
       (a (make-array n))
       (four 0)
       (two 0))
  (dotimes (i n)
    (let ((ai (read)))
      (if (zerop (mod ai 4))
          (incf four)
          (when (zerop (mod ai 2))
            (incf two)))
      (setf (aref a i) ai)))
  (format t "~A~%"
          (if (<= (1- n) (max
                           (if (< 0 four) (min 2 (+ four 2)) 0)
                           (if (<= 2 two) two 0)
                           (if (and (< 0 four)
                                    (<= 2 two))
                             (+ (if (evenp n) 0 1) four (1- two))
                             0)
                         (if (and (<= 2 four)
                                  (<= 2 two))
                             (+ 2 four (1- two))
                             0)))
              "Yes" "No")))