#include <bits/stdc++.h>
using ll = long long;
using namespace std;
ll GCD(ll a, ll b){ return a ? GCD(b % a, a) : b; }
int main(){
    int n,m;
    cin>>n>>m;
    vector<int> a(n);
    for(int i=0; i<n; i++) cin>>a[i];
    ll sum=0;
    for(int i=0; i<n; i++) sum+=a[i];
    int fourm=sum/(4*m);
    int cnt=0;
    for(int i=0; i<n; i++){
        if(fourm<=a[i]) cnt++;
    }
    if(cnt>=m) cout<<"Yes";
    else cout<<"No";
}