R help - May 2006 - microarray-like graph

Hi, I am beginning to learn R and have a data table that I would like to
produce a microarray-like plot. The table looks like this:

3 0 0 3 -377.61 1.94
3 0 0 3 -444.80 2.36
2 1 0 3 -519.60 2.39
1 1 1 3 -54.88 2.49
2 1 1 4 -536.55 2.53
1 0 1 2 108.29 2.62
2 0 0 2 39.56 2.62
3 0 1 4 108.32 2.63
2 0 0 2 -455.23 2.84
1 0 0 1 -432.30 2.98
...

I would like to assign colors to the first three columns and plot the last
column against fourth column which is the sum of the first three at each
row. Can anyone point to me how to approach this? Thanks for your
suggestions.

Regards,
-Eric

	[[alternative HTML version deleted]]

Eric Hu wrote:
> Hi, I am beginning to learn R and have a data table that I would like to
> produce a microarray-like plot. The table looks like this:
> 
> 3 0 0 3 -377.61 1.94
> 3 0 0 3 -444.80 2.36
> 2 1 0 3 -519.60 2.39
> 1 1 1 3 -54.88 2.49
> 2 1 1 4 -536.55 2.53
> 1 0 1 2 108.29 2.62
> 2 0 0 2 39.56 2.62
> 3 0 1 4 108.32 2.63
> 2 0 0 2 -455.23 2.84
> 1 0 0 1 -432.30 2.98
> ...
> 
> I would like to assign colors to the first three columns and plot the last
> column against fourth column which is the sum of the first three at each
> row. Can anyone point to me how to approach this? Thanks for your
> suggestions.
> 
Hi Eric,

Here is an initial try at your plot. I doesn't look great, but you may 
be able to use some of the ideas.

hu.df<-read.table("hu.dat")
 > hu.df
    V1 V2 V3 V4      V5   V6
1   3  0  0  3 -377.61 1.94
2   3  0  0  3 -444.80 2.36
3   2  1  0  3 -519.60 2.39
4   1  1  1  3  -54.88 2.49
5   2  1  1  4 -536.55 2.53
6   1  0  1  2  108.29 2.62
7   2  0  0  2   39.56 2.62
8   3  0  1  4  108.32 2.63
9   2  0  0  2 -455.23 2.84
10  1  0  0  1 -432.30 2.98
hu.col<-rgb(hu.df$V1,hu.df$V2,hu.df$V3,maxColorValue=3)
hu.col
  [1] "#BF0000" "#BF0000" "#804000"
"#404040" "#804040" "#400040" "#800000"
  [8] "#BF0040" "#800000" "#400000"
plot(hu.df$V6,hu.df$V4,col=hu.col,pch=15,cex=3)

Jim