]]> http://mathematica.blogoverflow.com/2012/10/turning-up-the-heat-maps/#comment-46 Sat, 06 Oct 2012 04:47:56 +0000 http://mathematica.blogoverflow.com/?p=329#comment-46 Verbeia, thank you – this is extremely useful for many applications.

In heatmap-dendrogram combinations one typically needs to reshuffle the rows and columns to ensure matching between the dendrogram leafs and the rows/columns in the heatmap. If you add the leaf labels to the dendrograms you see that the leafs and the rows/columns are not mapped correctly. The appropriate reshuffling of the input matrix can be done using the functions Agglomerate and ClusterFlatten in the same package. For example, the input data and the ticks in the matrix plot can be changed using

testdata[[rowShuffle, columnShuffle]]

and

ytixnew = ytix /. Thread[Range[Length[testdata]] -> rowShuffle]; xtixnew = xtix /. Thread[Range[Length[Transpose[testdata]]] -> columnShuffle];

where

rowShuffle = ClusterFlatten[Agglomerate[testdata -> Range[Length[testdata]]]]; columnShuffle = ClusterFlatten[Agglomerate[ Transpose[testdata] -> Range[Length[Transpose[testdata]]]]];

]]>