#include<iostream>
#include<cstring>
#include<algorithm>
using namespace std;

const int N=1000;
int n,k,m,ans;
int a[N],f[N],p[N];
bool st[N];

void is_Prime(int x)
{
	if(x<2) return ;
	for(int i=2;i<=x/i;i++)
	    if(x%i==0) return ;
	ans++;
}

bool find(int x)
{
	for(int i=0;i<m;i++)
	    if(p[i]==x) return true;
	p[m++]=x;
	return false;
}

void dfs(int u)
{
	if(u==k)
	{
		int sum=0;
		for(int i=0;i<k;i++) sum+=f[i];
		if(find(sum)) return ;
		is_Prime(sum);
		return ;
	}
	for(int i=1;i<=n;i++)
	{
		if(!st[i])
		{
			st[i]=true;
			f[u]=a[i];
			dfs(u+1);
			st[i]=false;
		}
	}
}

int main()
{
	cin>>n>>k;
	for(int i=1;i<=n;i++) cin>>a[i];
	dfs(0);
	cout<<ans<<endl;
}