AM_prior_K_Pois function

Computes the prior number of clusters