我有90乘90的矩阵,我试图得到一个数组相关矩阵.使用以下命令:
pdf('corr.pdf')
data <- read.table("test", header=T)
z <- cor(data)
levelplot(z)
dev.off()
Run Code Online (Sandbox Code Playgroud)
我得到这样的图像,我的标签变得污迹斑斑 
请提出改善图像的建议.
谢谢
编辑:从levelplot手册中获取第一个示例并将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)
Run Code Online (Sandbox Code Playgroud)
这将减少轴标签的字体大小,系数为.3.