updated R file - heatmaps for posterior probabilities