#include <array>
#include <deque>
#include <forward_list>
#include <list>
#include <vector>
#include <map>
#include <set>
#include <unordered_map>
#include <unordered_set>
#include <queue>
#include <stack>
#include <iterator>
#include <algorithm>
#include <cfenv>
#include <random>
#include <numeric>
#include <cmath>
#include <iosfwd>
#include <iostream>
#include <ios>
#include <streambuf>
#include <istream>
#include <ostream>
#include <iomanip>
#include <sstream>
#include <fstream>
using namespace std;

int compare_int(const void *a, const void *b)
{
    return *(int*)b - *(int*)a;
}


int main(){
    int N,M;
    int A[1000];
    int flg = 1;
    double sum=0;
    cin >> N >> M;
    for (int i = 0 ; i < N ; i++){
        cin >> A[i];
        sum += A[i];
    }
    sum /= (double)(4*M);
    qsort(A,N,sizeof(int),compare_int);
    for (int i = 0 ; i < M ; i++){
        if(sum > A[i]){
            flg--;
            break;
        }
    }
    if(flg){
        cout << "Yes";
    }else{
        cout << "No";
    }
    return 0;
}