fun main(args:Array<String>){
    val line = readLine()!!.split(" ").map{it.toInt()}
    val list = readLine()!!.split(" ").map { it.toInt() }.sorted()
    val n = line[0]
    val m = line[1]
    if(list[n-m]*4*m<list.sum())println("No") else println("Yes")
}