The following is adapted from help(pairs) :
lpanel <- function(x, y){ points(x, y, col=2, pch=".") }
upanel <- function(x, y){ points(x, y, col=3, pch="x") }
data <- matrix( rnorm(300), nc=3 )
colnames(data) <- paste("Column", LETTERS[1:3])
pairs(data, upper.panel=upanel, lower.panel=lpanel)
On Fri, 2004-10-29 at 21:24, John-J.Smith at ubs.com
wrote:> Hi,
>
> I am using pairs(x) , but would like to change the point font and color for
the bottom half of "x". I am using windows and opened a graphics page
using x11(), then tried:
>
> pairs(x)
> points(x[110:114,1],x[110:114,2],col="6",pch=8)
> points(x[115:119,1],x[115:119,2],col="4",pch=17)
>
> Nothing happened. I can program a loop and run thru the combinations of
plots and use the points function to get what I need. Hoping there is a more
simple solution using pairs().
>
> Thanks,
>
> John
>
> Visit our website at http://www.ubs.com
>
> This message contains confidential information and is intend...{{dropped}}
>
> ______________________________________________
> R-help at stat.math.ethz.ch mailing list
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide!
http://www.R-project.org/posting-guide.html
>