Imports System

Module Module1

    Sub Main()

        Dim tmp As String() = Split(Console.ReadLine(), " ")
        Dim H As Integer = CInt(tmp(0))
        Dim N As Integer = CInt(tmp(1))
        Dim tmp2 As String() = Split(Console.ReadLine(), " ")
        Dim hit As Integer = 0

        For i As Integer = 0 To N - 1
            hit += tmp2(i)
        Next

        If H > hit Then
            Console.WriteLine("No")
        Else
            Console.WriteLine("Yes")
        End If

    End Sub

End Module
