Re: [R] pairewise plots

From: Dimitris Rizopoulos <dimitris.rizopoulos_at_med.kuleuven.ac.be>
Date: Wed 30 Mar 2005 - 01:30:21 EST

you could try something like this:

dat <- array(sample(24), dim=c(4,2,3))
par(mfrow=c(3,1))
apply(dat, 3, function(x) plot(rowSums(x), x[,2]-x[,1]))

I hope it helps.

Best,
Dimitris



Dimitris Rizopoulos
Ph.D. Student
Biostatistical Centre
School of Public Health
Catholic University of Leuven

Address: Kapucijnenvoer 35, Leuven, Belgium

Tel: +32/16/336899
Fax: +32/16/337015
Web: http://www.med.kuleuven.ac.be/biostat/
     http://www.student.kuleuven.ac.be/~m0390867/dimitris.htm


Dear R users,

I have a data generated as the following,

dat <- data.frame(matrix(sample(24), nrow=4)) dimnames(dat) <-list(rownames=c('g1','g2','g3','g4'), colnames=c("A_CH1","A_CH2","B_CH1","B_CH2","C_CH3","C_CH3"))

dat

   A_CH1 A_CH2 B_CH1 B_CH2 C_CH3 C_CH3

g1    16    24     7     9    14    20
g2     4    10    19    22     5    17
g3    11    18    21    12    13     1
g4     2     3    15     6    23     8

I am trying to plot them pairwise by column(might extend to more than 3 pairs)
Instead manually plotting as below, could you please point me out with easier ways?

par(mfrow=c(3,1))

plot(dat$A_CH1+dat$A_CH2, dat$A_CH1-dat$A_CH2)
plot(dat$B_CH1+dat$B_CH2, dat$B_CH1-dat$B_CH2)
plot(dat[,5]+dat[,6], dat[,5]-dat[,6])

Thanks a lot for your help


[[alternative HTML version deleted]]



R-help@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

R-help@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 Received on Wed Mar 30 01:54:03 2005

This archive was generated by hypermail 2.1.8 : Fri 03 Mar 2006 - 03:30:56 EST