n,a,b=$<.map{|s|s.split.map &:to_i}
c=[0]*101
a.zip(b){|k,l|c[l]+=k}
puts c.max>c[0]?:NO:'YES'