import std.algorithm;
import std.conv;
import std.math;
import std.range;
import std.stdio;
import std.string;
import std.typecons;

void main() {
  int n, m;
  readf (" %d %d", &n, &m);
  auto a = new int[n];
  foreach (t; 0 .. n) {
    readf (" %d", &a[t]);
  }
  auto s = a.sum;
  auto c = a.count! (p => p * 4 * m >= s);
  writeln ( (c >= m) ? "Yes" : "No");
}

