import Foundation

func readInts() -> [Int]{
    readLine()!.split(separator: " ").map { Int($0)! }
}

func main(){
    let nm = readInts()
    let (_,m) = (nm[0],nm[1])
    let votes = readInts().sorted { $0 > $1 }
    let total = votes.reduce(0) { $0 + $1 }
    let count = votes.filter { $0*4*m >= total }.count
    
    print( count >= 3 ? "Yes": "No")
}
main()
