Imports System

Module Program
    Sub Main(args As String())
        Dim tmpA As String() = Split(Console.ReadLine(), " ")
        Dim tmpB As String() = Split(Console.ReadLine(), " ")

        Dim H As Long = CLng(tmpA(0))
        Dim N As Long = CLng(tmpA(1))

        Dim attack As Long = 0
        For i = 1 To N
            attack += CLng(tmpB(i - 1))
        Next

        If H <= attack Then
            Console.WriteLine("Yes")
        Else
            Console.WriteLine("No")
        End If

    End Sub
End Module
