Displaying 1 result from an estimated 1 matches for "cellcolors2".
Did you mean:
cellcolors
2011 Dec 12
2
Color2D.matplot uniform color range
...e value will be beforehand).
Any help would be greatly appreciated.
Thanks,
Jav
library(plotrix)
make_S_figure<-function(filename,alias){
h0 <- read.csv(file=filename,head=TRUE,sep=",",row.names=1)
d =data.matrix(h0)
m <- 1:20
cellcolors<-matrix(NA,nrow=20,ncol=20)
cellcolors2<--matrix(NA,nrow=20,ncol=20)
for(i in 1:length(m)){
cellcolors[d >= 1]<-color.scale(d[d>=1],cs1=c(1,1),cs2=c(1,0),cs3=c(1,0))
cellcolors[d<1]<-color.scale(d[d<1],cs1=c(0,1),cs2=c(0,1),cs3=c(1,1))
color2D.matplot(d,cellcolors=cellcolors,show.values=F,na.color="white&qu...