object Main extends App {
  val Array(n, m) = io.StdIn.readLine().split(' ').map(_.toInt)
  val an = io.StdIn.readLine().split(' ').map(_.toInt)
  val topM: Array[Int] = an.sortWith{ (x, y) => x > y}.take(m)
  val sum = an.sum
  println(if (topM.forall(_ >= sum / (4 * m))) "Yes" else "No")
}