Displaying 11 results from an estimated 11 matches for "edgetext".
Did you mean:
dgettext
2004 Mar 12
1
plot.dendrogram and expressions
Hi,
currently the "label" and "edgetext" attributes of a dendrogram are
coerced to character before they are added to a plot with `text'. Is there
a specific reason to do so (expect for the determination of the size of
the character string to be plotted)? Otherwise one could plot the
attributes directly via
diff dendrogram.R /u...
2011 Dec 09
1
how to add an edgetext to a dendrogram?
Hello to all,
I'd like to colour the different labels of my dendrogram. How can I do? I
guess I could to using *edgetext* and then* t.col* or *lab.col* but I don't
know how to add edgetext to my dendrogram. Can you help me please?
Example:
require(graphics); require(utils)
hc <- hclust(dist(USArrests), "ave")
plot(dend1)
labels (USArrests) [[1]] # to know how many cities (labels) = 50
nP <- li...
2011 Dec 12
1
how to colour labels (each label with a colour) in a dendrogram?
Hello to all,
I still have this doubt.
I'd like to colour the different labels of my dendrogram each one with a
different colour. How can I do? I guess I could do using *edgetext* and
then *t.col* or* lab.col* but I don't know how to add edgetext to my
dendrogram. Can you help me please?
Example:
require(graphics); require(utils)
hc <- hclust(dist(USArrests), "ave")
(dend1 <- as.dendrogram(hc))
plot(dend1)
labels (USArrests) [[1]] # to know how many...
2005 Oct 23
1
Coloring leaves, twigs and labels in plot.dendrogram()
...ow, but surely it
would be a useful feature to have....
Or is there an easier way of doing this that I have missed?
Walton Green
* * *
my.dend.plot <- function (x, type = c("rectangle", "triangle"),
center = FALSE, edge.root = is.leaf(x) || !is.null(attr(x,
"edgetext")), nodePar = NULL, edgePar = list(),
leaflab = c("perpendicular", "textlike", "none"), dLeaf = NULL,
xlab = "", ylab = "", xaxt = "n", yaxt = "s", horiz = FALSE,
frame.plot = FALSE, twig.col = NULL, lab.col = NU...
2007 Nov 25
2
accessing the "address" of items in a recursive list
...tract it:
smallDend <- dend[[i]][[j]][[k]] where i,j,k refer to levels of the dendrogram (it's "address")
I would like to print the "address" of the smaller dendrograms on the edge similar to this:
addr <- function(n) {
if(!is.leaf(n)) {
attr(n, "edgetext") <- paste("height of",(attr(n,"height"))
}
n
}
labeledDends <- dendrapply(dend, addr)
Where "i,j,k" is printed instead of "height". But I have not been able to figure out how to ask each dendrogram its address within the dendrapply f...
2005 Jul 11
1
indexing into and modifying dendrograms
...end1[[1]])
## here's a table relating dend1 and the cNum attribute
## dend1 cNum
## -------------------------
## dend1 4
## dend1[[1]] 2
## dend1[[2]] 3
## dend1[[2]][[1]] <not set>
## dend1[[2]][[1]] 1
## use cNum attribute in "edgetext"
## following example in dendrogram documentation
## would really rather associate with the node than the edge
## but current plotting function has no notion of nodetext
addE <- function(n) {
if(!is.leaf(n)) {
attr(n, "edgePar") <- list(p.col="plum")
attr...
2008 Nov 08
0
Bug in plot.dendrogram, and how to submit patches
...rsion 2.8.0 (2008-10-20)
i386-apple-darwin8.11.1
locale:
en_GB.UTF-8/en_GB.UTF-8/C/C/en_GB.UTF-8/en_GB.UTF-8
attached base packages:
[1] stats graphics grDevices utils datasets methods base
>
> d <- as.dendrogram(hclust(dist(list(a=1,b=2,c=4,d=5))))
> attr(d[[1]], "edgetext") <- "a & b"
> attr(d[[2]], "edgetext") <- "c & d"
> plot(d, horiz="F") #OK
> plot(d, horiz="T") #edge labels do not change position to account
for horiz
I think this is because stats:::plotNode doesn't deal wit...
2007 Jun 13
2
Formatted Data File Question for Clustering -Quickie Project
..."pink"),
lab.cex = 0.75, lab.col = "tomato")
plot(d3, nodePar= nP, edgePar = list(col="gray", lwd=2), horiz = TRUE)
addE <- function(n) {
if(!is.leaf(n)) {
attr(n, "edgePar") <- list(p.col="plum")
attr(n, "edgetext") <- paste(attr(n,"members"),"members")
}
n
}
d3e <- dendrapply(d3, addE)
plot(d3e, nodePar= nP)
plot(d3e, nodePar= nP, leaflab = "textlike")
--------------------------------------------------------
This information is being sent at the recipi...
2007 Mar 09
1
dendrogram - got it , just need to label :)
Hi all, Hi Gavin,
thx for your help i finally found out what i want to do and how to
fix it.
just needed to get some more level my cut level was too small...
two question remain...
a) can i somehow scale the twigs after cutting ?
b) how can i label the nodes and how to label which one...
thx !!
-m.
2008 Dec 22
0
R 2.8.1 is released
...o body<-() failed if the function had no arguments. It now
warns if discarding elements from a 'value' of type "expression".
o qr.coef() failed in the complex case for non-square systems.
(PR#13305)
o plot.dendrogram(horizontal=TRUE) did not not plot 'edgetext'
at the correct locations. (PR#13313)
o The starting point for plot.acf(ci.type="ma") was lag 0 when it
should have been lag 1. (PR#13071)
o There was an obscure bug with srcrefs, which could put the
parser into a condition giving "Error: bad value"...
2008 Dec 22
0
R 2.8.1 is released
...o body<-() failed if the function had no arguments. It now
warns if discarding elements from a 'value' of type "expression".
o qr.coef() failed in the complex case for non-square systems.
(PR#13305)
o plot.dendrogram(horizontal=TRUE) did not not plot 'edgetext'
at the correct locations. (PR#13313)
o The starting point for plot.acf(ci.type="ma") was lag 0 when it
should have been lag 1. (PR#13071)
o There was an obscure bug with srcrefs, which could put the
parser into a condition giving "Error: bad value"...