(defun main (&rest argv)
  (declare (ignorable argv))
  (let* ((n (read))
         (a 1)
         (xs (loop for i below 35 collect (1- (expt 2 i)))))
    (loop for i from 2 to n do (setq a (* a (nth i xs))))
    (format t "~a~%" (if (zerop (mod a (nth (1+ n) xs))) "Yes" "No"))))

(main)