; 平均値を求めて比較する
; 正しければ YES 間違っていれば NO を出力する
(defun main (&rest argv)
  (declare (ignorable argv))
  (let* ((n (read))
         (a (read))
         (m (/ (reduce #'+ (loop repeat n collect (read))) n)))
    (princ (if (equalp a m) 'YES 'NO))
    (terpri)))
(main)