3

我正在使用corrplot创建相关热图,但我不喜欢默认图例 - 它太大了。因此,我试图colorlegend()在创建绘图后使用 添加图例(并使用 禁用默认图例cl.pos="n")。

唯一的问题是我无法弄清楚如何更改图例的位置 - 它最终位于左下方。理想情况下,我可以将它放在右上角,但我查看了选项colorlegend和绘图,但无法弄清楚。

例如:

# load libraries and create color scale
library(corrplot)
library(RColorBrewer)
scalebluered <- colorRampPalette(brewer.pal(8, "RdBu"))(8)

# get data into correlation matrix
data(mtcars)
cars.matrix <- as.matrix(mtcars[c(2:8)])
cars.corr <- cor(cars.matrix)

# plot it
corrplot(cars.corr, method="shade", shade.col=NA, tl.col="black", 
         tl.srt=45, addgrid.col="black", type="lower", diag=FALSE, cl.pos="n")

# add legend
colorlegend(scalebluered, c(seq(-1,1,.25)), align="l", vertical=TRUE, addlabels=TRUE)

输出:http: //i42.tinypic.com/14wsqc0.png

4

2 回答 2

3

几个月后,我重新审视这个并弄清楚..只需添加 xlim 和 ylim 来定义图例的尺寸.. 超级简单!

colorlegend(xlim=c(10,15), ylim=c(10,15), scalebluered, c(seq(-1,1,.25)), align="l", vertical=TRUE, addlabels=TRUE)
于 2014-06-18T04:19:40.943 回答
0

像这样?改变cl.pos="n" to "r"

corrplot(cars.corr, method="shade", shade.col=NA, tl.col="black", 
         tl.srt=45, addgrid.col="black", type="lower", diag=FALSE, cl.pos="r")
于 2013-11-04T18:03:27.750 回答