2012-04-24 16 views
1

私は行列が90で90であり、配列相関行列を取得しようとしています。次のコマンドを使用:レベルプロット関数の軸ラベルのフォントサイズを調整するR

pdf('corr.pdf') 
data <- read.table("test", header=T) 
z <- cor(data) 
levelplot(z) 
dev.off() 

を私はこのような画像を取得し、私のタグは、画像を改善するためのご提案を教えてください

enter image description hereを汚れなっています。

ありがとう

答えて

-1

そして勝者は:

pdf('corr.pdf') 
data <- read.table("test", header=T) 
z <- cor(data) 
heatmap.2(z, Rowv=FALSE, Colv=FALSE, dendrogram="none", 
      key=TRUE, density.info="none", trace="none", 
      col=colorpanel(100, lowColor, highColor), scale="none",cexRow=0.3, cexCol=0.3) 
dev.off() 
+1

ヒートマップはLevelplotと全く同じではありません(OPはLevelplotについて質問しました)。ヒートマップは補間のため輪郭線を追加します。 Levelplotは、データをグリッドに描画します。また、LevelplotがcexRowとcexColのパラメータを認識しているかどうかはわかりませんが、間違っている可能性があります。 – solvingPuzzles

3

あなたは

pdf('corr.pdf', width=100, height=100) 
data <- read.table("test", header=T) 
z <- cor(data) 
levelplot(z) 
dev.off() 
+0

おかげで。問題は部分的に解決される。どのようにしてx軸の垂直ラベルを水平にすることができますか? – Angelo

+0

'?par' .... 'las'パラメータを見てください。 –

5

EDITでこれを修正することができます。levelplot manualから最初の例を取るとscales=list(log="e")引数scales=list(log="e",x=list(cex=.3),y=list(cex=.3))に変更します。

x <- seq(pi/4, 5 * pi, length.out = 100) 
y <- seq(pi/4, 5 * pi, length.out = 100) 
r <- as.vector(sqrt(outer(x^2, y^2, "+"))) 
grid <- expand.grid(x=x, y=y) 
grid$z <- cos(r^2) * exp(-r/(pi^3)) 
levelplot(z~x*y, grid, cuts = 50, 
     scales=list(log="e",x=list(cex=.3),y=list(cex=.3)), xlab=list(cex=.05), 
     ylab=list(cex=.25), main=list(label="Weird Function", cex=5), sub="with log scales", 
     colorkey = FALSE, region = TRUE) 

この意志を軸ラベルのフォントサイズを0.3倍に縮小します。

+0

いいえ、私は見出しのサイズを編集する必要はありません。 x軸とy軸のラベルのサイズを編集したい。今は汚れている。 – Angelo

+0

@Angelo OK、そうです。その意味を反映するために質問を編集し、上記の答えを変更しました。 – TemplateRex

+0

これは、コマンドが次のようになります。levelplot(z、scales = list(log = "e"、x = list(cex = .3)、y = list(cex = .3)))エラーlog(lim、base)のエラー:数学的関数への数値以外の引数 – Angelo