created new R file - heatmaps for posterior probabilities