Functions for Drawing Gapped Cluster Heatmap with ggplot2