import std.stdio;
import std.conv;
import std.string;
import std.typecons;
import std.algorithm;
import std.array;
import std.range;
import std.math;
import std.regex : regex;
import std.container;
import std.bigint;


void main()
{
  int n, m;
  readf("%s %s\n", &n, &m);
  auto a = readln.chomp.split.to!(int[]);
  int cnt;
  auto vote = a.sum;
  foreach (i; 0..n) {
    if (4 * m * a[i] >= vote) {
      cnt++;
    }
  }

  if (cnt >= m) {
    writeln("Yes");
  } else {
    writeln("No");
  }
}
