heatmap in R

package: gplots
function: heatmap.2
ToDo: ​heatmap in groups
​The plot I want is just like:

Question: 左边的color bar中不同的color对应不同的category， 如何实现heatmap中同一类别的聚类？
​
​