#include<stdio.h>
#include<stdlib.h>
#include<string.h>
typedef long long ll;

int hikaku(const void *n1,const void *n2)
{
    return *(int*)n2-*(int*)n1;
}

int main()
{
    int n,m,sum=0;
    scanf("%d %d",&n,&m);
    int a[n];

    for(int i=0;i<n;i++)
    {
        scanf("%d",&a[i]);
        sum=sum+a[i];
    }

    qsort(a,n,sizeof(int),hikaku);

    if(a[m-1]>=sum/(4*m))
    {
        printf("Yes\n");
    }
    else
    {
        printf("No\n");
    }
}