0

この質問は、このSO 投稿と似ています。

比率のサンプル データ:

n=50
ratio1 <- seq(0,1.5,(1.5-0)/(n-1))
ratio2 <- seq(0,2.5,(2.5-0)/(n-1))
ratio3 <- seq(0.5,4.5,(4.5-0.5)/(n-1))
ratio4 <- seq(1,3,(3-1)/(n-1))
ratio5 <- seq(0.7,2,(2-0.7)/(n-1))

比率に名前を付けるには:

rname <- c("a/b","c/d","e/f","g/h","i/j")

したがって、y 軸のラベルはc(a,c,e,g,i)、x 軸はc(b,d,f,h,j)

ここで、現在の測定値が次のとおりであるとします。

measure.r <- data.frame(c(0.7,1.5,3.3,2.5,1.5))
colnames(measure.r) <- C("r1","r2","r3","r4","r5")

ここで、相関行列のプロットに関する参照 SO 投稿として、各ドメイン (ratio1、ratio2... など) 内の測定値をプロットしたいと思います。

そこで、区間内の現在の測定値位置を色で表現したいと思います（緑から赤、赤は上限に達したことを意味します）

ここで参照されている相関行列として 5 つの比率をプロットしたいと思います。各四角は、測定値の状態を (色で) 表します。

ここに画像の説明を入力

bwplotボックスプロットとラティスを組み合わせようとしましたlevelplotが、うまくいきませんでした。

上記が理にかなっていることを願っています。上記の説明に関して質問がある場合は、投稿してください。

4

1 に答える 1

2

ここで何をしたいのかを伝えるのはかなり難しいですが、これで始めることができます

# some fake data
n <- 5
x <- y <- seq_len(n)
z <- outer(x, y, "/")*rnorm(n) # create a matrix of values

# color palette function
pal <- colorRampPalette(c("green", "red"))

# setup plotting regions
layout(matrix(1:2), heights=c(0.7,0.3))

# make an image of the matrix
# ("n" turns off the axis labeling)
image(x, y, z, xaxt="n", yaxt="n", col=pal(11), asp=1, pty="s")
axis(1, x, letters[1:5])
axis(2, y, letters[6:10])

# add a cheap colorbar...
cz <- pretty(range(z))
cx <- seq_along(cz)
image(x=cx, z=matrix(cz), xaxt="n", yaxt="n", col=pal(11))
axis(1, cx, cz)

あなたにこれを与えます：

図

したがって、あなたの仕事はzコードの作成と変更などです。

于 2013-10-16T22:04:50.593 に答える