6

このデータの画像プロットを作成しました。

sample
         p         p.1         p.2         p.3         p.4
  p    1.0000000  0.24077171 -0.66666667 -0.49009803  0.61237244
  p.1  0.2407717  1.00000000  0.09028939 -0.83444087  0.14744196
  p.2 -0.6666667  0.09028939  1.00000000  0.21004201  0.10206207
  p.3 -0.4900980 -0.83444087  0.21004201  1.00000000 -0.08574929
  p.4  0.6123724  0.14744196  0.10206207 -0.08574929  1.00000000

このコードの使用:

  image.plot(sample,col=redblue(191), zlim=c(-1,1))

私はこの画像を取得します:

x軸とy軸で0.00.20.4 ..の代わりに、p p.1 p.2が必要です...どうすればそれを取得できますか?あなたの時間と配慮していただきありがとうございます?

私のヒートマップは次のようになります。

ここに画像の説明を入力してください

その対称ではありません。これを直していただけませんか?私はこのコードを使用しています:

シェード=c(seq(-1、-0.5、length = 64)、seq(-0.5,0.5、length = 64)、seq(0.5,1、length = 64))
heatmap.2(sample、dendrogram ='none '、symm = TRUE、Rowv = FALSE、Colv = FALSE、key = TRUE、cexCol = 0.7、cexRow = 1、scale = "row"、keysize = 1、col = redblue(191)、breaks = Shades)

4

1 に答える 1

10

これはより良い解決策です:

 par(mar=c(5,4.5,4,7))
 image(sample, col=rainbow(25), axes=F)  #redblue() doesn't work on my computer.
 axis(2)
 axis(1, at=seq(0,0.8,0.2), labels=rownames(sample))
 image.plot(sample, legend.only=T)

ここに画像の説明を入力

編集: 以下のプロットは、探しているものに似ていますか?

 sample = cor(matrix(rnorm(400), nrow=20))
 image(cor(matrix(rnorm(400), nrow=20)), axes=F)
 mtext(text=c(paste("country",1:21)), side=2, line=0.3, at=seq(0,1,0.05), las=1, cex=0.8)
 mtext(text=c(paste("country",1:21)), side=1, line=0.3, at=seq(0,1,0.05), las=2, cex=0.8)
 image.plot(sample, legend.only=T)

ここに画像の説明を入力

于 2012-05-27T03:51:45.307 に答える