Public Class Main
  Public Shared Sub Main()
    Dim arr() As Integer = Array.ConvertAll(Of String, Integer) _
        (Split(Console.ReadLine()), AddressOf Integer.Parse)
    Dim A() As Integer = Cin.ConvertAll(Of String, Integer) _
        (Split(Console.ReadLine()), AddressOf Integer.Parse)
    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
