similar to: Reimplement stats:::plotNode as iterative to avoid recursion limits?

The problem: =========== Once a dendrogram has a branch with both a line type AND a color (which is a character color), the plot.dendrogram function will not plot and return an error. I say this is a bug because (I believe), we would like a dendrogram to be able to use character colors, while also allowing control over line types. This e-mail includes an example, and what I think a solution

Hello, It seems that the plot function for dendrograms does not draw labels when they are too long. > hc <- hclust(dist(USArrests), "ave") > dend1 <- as.dendrogram(hc) > dend2 <- cut(dend1, h=70) > dd <- dend2$lower[[1]] > plot(dd) # first label is drawn > attr(dd[[1]], "label") <- "aaaaaaaaaaaaaaaaaa" > plot(dd) # first label is

I have a data set with 6 variables and 251 cases. The people who supplied me with this data set believe that it falls naturally into three groups, and have given me a rule for determining group number from these 6 variables. If I do scaled.stuff <- scale(stuff, TRUE, c(...the design ranges...)) stuff.dist <- dist(scaled.stuff) stuff.hc <- hclust(stuff.dist)

Hello all, I am using the heatmap.2 function in the gplots package. I want to supress the reordering of the columns of the data matrix i pass to the function. I used the statement, heatmap.2(z,Colv=FALSE,dendrogram="row",col=redgreen(75)) where z, is the matrix of data. The output i want should have the rows reordered along with the dendrogram and the columns should be in the original

Full_Name: Shane Neph Version: 2.2.1 OS: mac os x Submission from: (NULL) (71.113.43.247) While I found the names of the package authors and maintainer, I was unsuccessful in finding any contact information. The preliminary documentation for heatmap.2 is inconsistent in at least a couple of places when discussing the suppression of one or more dendrograms (and column/row ordering in general).

Hi, I am a beginner for R. I had use gplots to generate a heatmap as following: >heatmap.2(matrix, col=topo.colors(75), dendrogram="column", Rowv=FALSE, trace="none", key=TRUE, keysize=0.8, density.info="none", cexRow=0.2, cexCol=0.6) It work well. It generate heatmap whith rcolumn clustering dendrogram and I can export a very nice graph. But I don not know how

Core developers, I couldn't find any simple way to send a vector of colors to apply to each terminal in plot.dendrogram() or plot.hclust()---I asked R-help about it a few weeks ago and didn't get any response---so I hacked that functionality into the plot.dendrgram code (see below for hacked function plus examples).... Is there any chance this functionality could be added to the

Hi Sorry to revisit an old problem, I seemed to solve this in 2004, only for it to resurface :-S I am trying to plot a heatmap, and I don't want the columns of my matrix re-ordered. The function doesn't seem to behave as the help would have you believe: a <- matrix(rnorm(100),nr=20) a.d <- dist(a) a.hc <- hclust(a.d) a.de <- as.dendrogram(a.hc) # columns are re-ordered

Hi, I'm trying to save heatmaps as PDFs. However, the PDF version of the heatmaps (Heatmap_CAFvsTNF_run2.pdf) is blurred when compared to its counterpart, which was saved manually by using the software "Grab" (Heatmap_CAFvsTNF_run2.tiff). -----R code-------- sample_output <- "stroma_run2" filename <-

Hello, I have come across some unexpected behaviour of the function heatmap in the stats package. This looks like a bug to me, but I might have misunderstood something. When calling the function in symmetric mode, the ColSideColors are plotted correctly, but RowSideColors appear in reverse order. This code (modified from the example on the help page) demonstrates the problem: cU <-

I generated a heatmap in R using the following commands: > mydata <- read.csv(file="Data.csv", header=TRUE, sep=",") > mydata <- mydata[rowSums(mydata[,-1]^2) >0, ] > rownames(mydata)=mydata$Name > mydata <- mydata[,2:253] > mydatamatrix <- data.matrix(mydata) > mydatascale <- t(scale(t(mydatamatrix))) > hr <-

Esteemed R-users, heatmap.2() is yielding an inappropriate key based on my colors and break-points. In the reproducible example below, the key is inappropriate (to me) because- 1. 'Orange' is simply not represented in the key, despite its prescence in the heatmap. 2. The proportions of the key are clearly out, ie., my largest bin, (0.1 - 0.2) is half the range, but this bin (colored

I generated a heatmap in R using the following commands: > mydata <- read.csv(file="Data.csv", header=TRUE, sep=",") > mydata <- mydata[rowSums(mydata[,-1]^2) >0, ] > rownames(mydata)=mydata$Name > mydata <- mydata[,2:253] > mydatamatrix <- data.matrix(mydata) > mydatascale <- t(scale(t(mydatamatrix))) > hr <-

Dear all, I've been trying to find how to compare tow different heatmaps but I'm having trouble getting the colors bar to be the same. I'm doing something like the following: library(gplots) dat<-cor(matrix(rnorm(100, m=10), nrow=10)) mat<-cor(matrix(rnorm(100), nrow=10)) dev.new() heatmap.2(mat, Rowv=NA, Colv=NA, col=redgreen(75), symm=TRUE, trace="none",

Hi, hres <- hclust(smatr,method="single") hresd<-as.dendrogram(hres) as.dendrogram(hres) `dendrogram' with 2 branches and 380 members total, at height 2514.513 plot(hresd,leaflab="none") #<-error here. #the plotted dendrogram is incomplete. The x axis is not drawn. #The interested reader can download the save(hresd,file="hres.rda") #from the

Dear All, I want to plot a heat map with annotated columns. Both functions heatmap (stats) and heatmap.2 (gplots) can plot a horizontal side bar that can be used to visualize a categorical variable. In addition to a categorical variable, I would like to visualize a continuous variable. This could be done by small bars, a curve or simply numbers above the columns. (The Sample names are already

Hi,   I need to generate a heatmap on a square matrix and wouldn't want to reorder the columns and the rows on the heatmap display.    I have used the options Rowv=NULL and Colv=NULL but doesn't seem to work. Following is a snippet of the heatmap function i am using. args <- commandArgs(); inputfile <- args[2] imgfile   <- args[3] bitmap(imgfile, height=15, width=15, res=100,

Hi I am trying to understand what happen with the heatmap.2 code that it used to work (last used in October 2015). I am able to get a heatmap but my colour key doesn't come up and instead I get an error in all my files the used to work. Does anyone has any idea of what could have changed? or how to fix this. Thanks. # Error in seq.default(min.raw, max.raw, by = min(diff(breaks)/100)) :

I have written a wrapper for heatmap.2 called heatmap.w.row.and.col.clust which auto-generates breaks using breaks<-round((c(seq(from=(-20 * stddev), to=(20 * stddev))))/20, digits = 2) #(stddev in this case = 2.5) This has always worked well in the past but now I am getting an error that non-finite breaks are being generated. Drilling down, it seems that my wrapper is generating finite

Hi, I have a gene expression experiment with 20 samples and 25000 genes each. I'd like to perform clustering on these. It turned out to become much faster when I transform the underlying matrix with t(matrix). Unfortunately then I'm not anymore able to use cutree to access individual clusters. In general I do something like this: hc <- hclust(dist(USArrests), "ave")