Displaying 1 result from an estimated 1 matches for "edgenames".
Did you mean:
edgecases
2009 Feb 10
0
Resize edge's label fontsize
...did not change.
Did I do something wrong ?
M <- matrix(nrow=5,ncol=5,byrow=TRUE,data=mytable)
colnames(M) <- levels(pf$agent)
A <- new("graphAM", M, "directed", values = list(weight=M))
eAttrs <- list()
ew <- as.character(unlist(edgeWeights(A)))
names(ew) <- edgeNames(A, recipEdges = "distinct")
eAttrs$label <- ew
fs2 <- rep(c(72), length(ew))
names(fs2) <- edgeNames(A, recipEdges = "distinct")
eAttrs$labelfontsize <- fs2
plot(A,
attrs = list(node = list(label = "foo", fillcolor = "lightblue"), edge
= list(c...