Update ggplot-heatmap.R

This is a very nifty function. Thanks. The column and row labels are not correct in the posted version. I posted a fix for that. See lines 101-106