Update aheatmap.R