(let ((n (read)) (avr (read)))
  (let loop ((m 0) (sum 0))
    (if (= m n)
	(if (= sum (* n avr))
	    (print "YES")
	    (print "NO"))
	(loop (+ m 1) (+ sum (read))))))