Public Class Main
    Public Shared Sub Main()
        Dim arr() As Integer = sc.IntArr()
        Dim A() As Integer = sc.IntArr()
        Dim H As Integer = arr(0)
        Dim N As Integer = arr(1)
        Dim accum As Integer = 0
        For i As Integer = n - 1 To 0 Step -1
          accum += A(i)
        Next
        Console.WriteLine(If(accum < h, "No", "Yes"))
    End Sub
End Class

' FastScanner start
Public Class sc
    Public Shared Function Str() As String
        Return Console.ReadLine().Trim()
    End Function
    Public Shared Function Int() As Integer
        Return Integer.Parse(Str())
    End Function
    Public Shared Function Lng() As Long
        Return Long.Parse(Str())
    End Function
    Public Shared Function Dbl() As Double
        Return Double.Parse(Str())
    End Function
    Public Shared Function StrArr(Optional separator As String = " ") As String()
        Return Str().Split(separator)
    End Function
    Public Shared Function IntArr(Optional separator As String = " ") As Integer()
        Return Array.ConvertAll(Of String, Integer)(StrArr(separator), AddressOf Integer.Parse)
    End Function
    Public Shared Function LngArr(Optional separator As String = " ") As Long()
        Return Array.ConvertAll(Of String, Long)(StrArr(separator), AddressOf Long.Parse)
    End Function
    Public Shared Function DblArr(Optional separator As String = " ") As Double()
        Return Array.ConvertAll(Of String, Double)(StrArr(separator), AddressOf Double.Parse)
    End Function
End Class
' FastScanner end