R help - Jun 2011 - a bug in heatmap.plus?

Hi Allen and list,

See the code below.? I've tried it on R2.13 and R2.8.0 using either
heatmap.plus 1.3 or the latest.? All gave the same results.? The problem is in
the last line: when I tried to plot two different color bars, the one
corresponding to "cm.colors(10)" is not correct (it starts with one
black and one red.? Not sure where they're from?)

Any ideas?

Thanks!

...Tao


library(heatmap.plus)
set.seed(1234)

x <- matrix(rnorm(400), ncol=10)
heatmap(x, ColSideColors= cm.colors(10), Colv=NA)
heatmap.plus(x, ColSideColors=cbind(cm.colors(10), cm.colors(10)), Colv=NA)
heatmap.plus(x, ColSideColors=cbind(rep(1:2,each=5), cm.colors(10)), Colv=NA)

No idea, and no time to debug this unfortunately.

I'd like to hand off maintenance of this package if anyone is using it.

-Allen


On Wed, Jun 8, 2011 at 9:50 PM, Shi, Tao <shidaxia@yahoo.com> wrote:
> Hi Allen and list,
>
> See the code below.  I've tried it on R2.13 and R2.8.0 using either
> heatmap.plus 1.3 or the latest.  All gave the same results.  The problem is
> in the last line: when I tried to plot two different color bars, the one
> corresponding to "cm.colors(10)" is not correct (it starts with
one black
> and one red.  Not sure where they're from?)
>
> Any ideas?
>
> Thanks!
>
> ...Tao
>
>
> library(heatmap.plus)
> set.seed(1234)
>
> x <- matrix(rnorm(400), ncol=10)
> heatmap(x, ColSideColors= cm.colors(10), Colv=NA)
> heatmap.plus(x, ColSideColors=cbind(cm.colors(10), cm.colors(10)), Colv=NA)
> heatmap.plus(x, ColSideColors=cbind(rep(1:2,each=5), cm.colors(10)),
> Colv=NA)
>
	[[alternative HTML version deleted]]