func main()
	var n: int :: cui@inputInt()
	var a: []int :: #[n]int
	for i(0, n - 1)
		do a[i] :: cui@inputInt()
	end for
	
	var ans: bool :: false
	for id(0, 3 ^ n - 1)
		var i: int :: id
		var arr: []int :: #[3]int
		for j(0, n - 1)
			do arr[i % 3] :+ a[j]
			do i :/ 3
		end for
		if(arr[0] = arr[1] & arr[1] = arr[2])
			do ans :: true
			break id
		end if
	end for
	do cui@print((ans ?("Yes", "No")) ~ "\n")
end func