import Data.List
main=do
 getLine
 ab<-sort.map((\[a,b]->(b,a)).map read.words).lines<$>getContents
 putStrLn$if f 0 ab then"Yes"else"No"
f now[]=True
f now((b,a):ab)
 |now+a<=b=f(now+a)ab
 |otherwise=False