I'd want to combine 3 pheatmap into 1 figure. Here is the test code. it seems `mfrow` parameter does not work for it.

```
test = matrix(rnorm(200), 20, 10)
test[1:10, seq(1, 10, 2)] = test[1:10, seq(1, 10, 2)] + 3
test[11:20, seq(2, 10, 2)] = test[11:20, seq(2, 10, 2)] + 2
test[15:20, seq(2, 10, 2)] = test[15:20, seq(2, 10, 2)] + 4
colnames(test) = paste("Test", 1:10, sep = "")
rownames(test) = paste("Gene", 1:20, sep = "")

par(mfrow=c(1,2))
pheatmap(test)
pheatmap(test, kmeans_k = 2)
pheatmap(test, kmeans_k = 3)
```
<p>If it&#39;s just for the one figure, I&#39;d do it manually in Inkscape. However, for high throughput figure production, I would export individual images from R and script the final figure assembly from the components, for example using <a href="http://www.imagemagick.org/" target="_blank">ImageMagick</a>. You could also write an SVG file directly (for example with the perl module <a href="http://search.cpan.org/~ronan/SVG-2.28/SVG/Manual.pm" target="_blank">SVG</a>) or by scripting Inkscape.</p>
