連鎖不平衡係数などの値を格納した、正方行列型の以下のようなテキストファイル、"hoge.txt"を作ったとする。 Rのimage()関数で、これをグレースケールで表したいとする。84段階表示なら HOGE<-read.table(file="hoge.txt") HOGEmatrix<-as.matrix(HOGE) q<-84 image(1:nrow(HOGEmatrix),1:ncol(HOGEmatrix),HOGEmatrix,col=gray((q:0)/q))色をつけるなら、rgbを使って、 redcolor<-rgb(red=1,(q:0)/q,(q:0)/q, names=paste("red",0:q,sep="."))とすると、q=84=256/3なので、以下のように、"#xxyyzz"のxx部分が赤のff=256(16進数で、0,1,2,3,4,5,6,7,8,9,