fun main(args: Array<String>) {
    val (N, M) = readLine()!!.split(" ").map(String::toInt)
    val a_n = readLine()!!.split(" ").map(String::toInt)
    val total = a_n.fold(0) {i, e -> i + e}

    if(a_n.filter {if(total % (4 * M) == 0) {it < total / (4 * M)} else {it <= total / (4 * M)} }.size > (N-M)) {"No"} else {"Yes"}.run(::println)
}