import Control.Monad
import Data.List
 
main :: IO ()
main = do
  n <- readLn
  abn <- sortOn head . map ((\[a,b] -> [b-a,a,b]) . read :: String -> Int) . words) <$> getNLine_ n
  if ans abn then putStrLn "Yes" else putStrLn "No"
 
ans :: [[Int]] -> Bool
ans abn = fst $ foldl func (True,0) abn where
  func (b,s) [_,t,l] = (b && s+t <= l, s+t)
 
getNLine_ :: Int -> IO [String]
getNLine_ n = replicateM n getLine
