fun main(args: Array<String>) {
    val line = readLine()!!.trim()
    var (n, m) = line.split(" ").map {it.toLong()}
    val line2 = readLine()!!.trim()
    var ary = line2.split(" ").map {it.toLong()}.slice(0..n.toInt()-1)

    val totalVote: Long = ary.sum()
    val threshold: Double = totalVote / (4 * m.toDouble())

    val b = ary.filter {it >= threshold}.size >= m

    if (b) {
        println("Yes")
    } else {
        println("No")
    }
}