[R] Hide line ends behind unfilled circles?

2006-10-15 Thread Michael Kubovy
Dear r-helpers, xx - c(0.000, 0.210, 0.714, 0.514, 1.000, 0.190, 0.590, 0.152) yy - c(0.000, 0.265, 0.256, 0.521, 0.538, 0.761, 0.821, 1.000) aa - c(19, 19, 19, 21, 19, 21, 21, 21) x0 - xx[c(1, 1, 2, 2, 2, 3, 3, 4, 4, 4, 5, 6, 6, 7)] y0 - yy[c(1, 1, 2, 2, 2, 3, 3, 4, 4, 4, 5, 6, 6, 7)] x1 -

Re: [R] Hide line ends behind unfilled circles?

2006-10-15 Thread Uwe Ligges
Michael Kubovy wrote: Dear r-helpers, xx - c(0.000, 0.210, 0.714, 0.514, 1.000, 0.190, 0.590, 0.152) yy - c(0.000, 0.265, 0.256, 0.521, 0.538, 0.761, 0.821, 1.000) aa - c(19, 19, 19, 21, 19, 21, 21, 21) x0 - xx[c(1, 1, 2, 2, 2, 3, 3, 4, 4, 4, 5, 6, 6, 7)] y0 - yy[c(1, 1, 2, 2, 2, 3, 3,

Re: [R] Hide line ends behind unfilled circles?

2006-10-15 Thread Peter Dalgaard
Michael Kubovy [EMAIL PROTECTED] writes: Dear r-helpers, xx - c(0.000, 0.210, 0.714, 0.514, 1.000, 0.190, 0.590, 0.152) yy - c(0.000, 0.265, 0.256, 0.521, 0.538, 0.761, 0.821, 1.000) aa - c(19, 19, 19, 21, 19, 21, 21, 21) x0 - xx[c(1, 1, 2, 2, 2, 3, 3, 4, 4, 4, 5, 6, 6, 7)] y0 - yy[c(1,

Re: [R] Hide line ends behind unfilled circles?

2006-10-15 Thread Marc Schwartz
On Sun, 2006-10-15 at 11:21 -0400, Michael Kubovy wrote: Dear r-helpers, xx - c(0.000, 0.210, 0.714, 0.514, 1.000, 0.190, 0.590, 0.152) yy - c(0.000, 0.265, 0.256, 0.521, 0.538, 0.761, 0.821, 1.000) aa - c(19, 19, 19, 21, 19, 21, 21, 21) x0 - xx[c(1, 1, 2, 2, 2, 3, 3, 4, 4, 4, 5, 6, 6, 7)]

Re: [R] Hide line ends behind unfilled circles?

2006-10-15 Thread Gabor Grothendieck
Here is a completely different solution using gplot in sna. We create an edge matrix, edges, and plot it. library(sna) edges - replace(matrix(0, 8, 8), cbind(match(x0, xx), match(x1, xx)), 1) gplot(edges, coord = cbind(xx, yy), usearrows = FALSE, vertex.col = c(black, white)[factor(aa)]) On