(N,),A,B=$<.map{|s|s.split.map &:to_i}
c=0
v=[]
w=0
A.zip(B).map{|a,b|
  if a<b
    w+=b-a
    c+=1
  elsif a>b
    v<<a-b
  end
}
v.sort!.reverse!
v.map{|d|
  if w>0
    c+=1
  end
  w-=d
}
p w>0 ? -1 : c