title: pheatmap - cytokine_annotation
body: <p>I tried to develope cytokine_annotation in pheatmap and get error message </p>
  
  <blockquote>
    <p>Error in seq.int(rx[1L], rx[2L], length.out = nb) : 'from' must be
    finite</p>
  </blockquote>
  
  <p>R version 3.3.3
  pheatmap_1.0.8</p>
  
  <p>Reproducible example:</p>
  
  <pre><code>#Using cytokine annotations
  M&lt;-matrix(rnorm(8*20),ncol=8)
  row_annotation&lt;-data.frame(A=gl(4,nrow(M)/4),B=gl(4,nrow(M)/4))
  eg&lt;-expand.grid(factor(c(0,1)),factor(c(0,1)),factor(c(0,1)))
  colnames(eg)&lt;-c("IFNg","TNFa","IL2")
  rownames(eg)&lt;-apply(eg,1,function(x)paste0(x,collapse=""))
  rownames(M)&lt;-1:nrow(M)
  colnames(M)&lt;-rownames(eg)
  cytokine_annotation=eg
  pheatmap(M,annotation=annotation,row_annotation=row_annotation,annotation_legend=TRUE,row_annotation_legend=TRUE,cluster_rows=FALSE,cytokine_annotation=cytokine_annotation,cluster_cols=FALSE)
  </code></pre>