wa1,4

#include<iostream>
#include<math.h>
using namespace std;
int n,k,a[100010],ans,vis[100010];
bool f(int o){
	for(int i=2;i<=sqrt(o);i++){
		if(o%i==0) return false;
	}
	return true;
}
void dfs(int p,int s,int u){
	if(p==k && f(s)){
		ans++;
		return ;
	}
	if(p>=k) return ;
	for(int i=1;i<=n;i++){
		if(!vis[i] && a[i]>u){
			vis[i]=1;
			dfs(p+1,s+a[i],a[i]);
			vis[i]=0;
		}
	}
}
int main(){
	cin >> n >> k;
	for(int i=1;i<=n;i++) cin >> a[i];
	dfs(0,0,-10000000);
	cout << ans;
	return 0;
}