From: Deepayan Sarkar <deepayan_at_stat.wisc.edu>

Date: Wed 30 Mar 2005 - 01:46:09 EST

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 02:08:42 2005

Date: Wed 30 Mar 2005 - 01:46:09 EST

On Tuesday 29 March 2005 08:58, Hai Lin wrote:

> 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
*

Why would you want two columns with the same name?

> 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?
*

If your data frame can be easily restructured (using reshape perhaps), one possible solution would be to use the lattice package:

require(lattice)

tmd(xyplot(c(A_CH1, B_CH1, C_CH1) ~ c(A_CH2, B_CH2, C_CH2) | gl(3, 4),

dat, layout = c(3, 1)))

Note that

1. This is with the data frame as it is, except that I assume the

last 2 columns are named C_CH1 and C_CH2 2. This plots the mean instead of the sum (but on the other hand,

it's a standard plot that way)

Deepayan

*> 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
*

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 02:08:42 2005

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