R - 更改corrplot的轴标签大小
Don*_*ied 11 plot r font-size correlation r-corrplot
我使用以下corrplot:
require("corrplot") ## needs the corrplot package
corrplot(cor(lpp_axis1, lpp_axis2), method=c("number"), bg = "grey10",
addgrid.col = "gray50", tl.offset = 2, tl.cex=2,
tl.col = "black",
col = colorRampPalette(c("yellow","green","navyblue"))(100))
这是使用此处提供的csv文件创建的.
图表很好,我可以调整我想要的cl标签.我试过调整x和y轴上的标签没有任何影响.我看着改变马克 - 但我还没找到办法.我尝试使用cex.label来改变大小是不成功的.
问题 - 如何使文本出现在corrplot(不是cl,而不是在网格中)更大？
两个轴是以下数据框:
lpp_axis1 <- data.frame("Compile Source Code" = Q3A.1, "View Source Code" = Q3A.2, "Change Source Code" = Q3A.3, "Write Documentation" = Q3A.8, "File Bug Reports"= Q3B.3, "Ask Questions" = Q3B.5, "Provide Answers" = Q3B.6, "Overall Participation" = Q3a3bConsolidated)
lpp_axis2 <- data.frame("Identification" = Q1,"Overall Learning" = Q6Consolidated, "Learning Programming" = Q6.1, "Learning about Computers" = Q6.2, "Learning Teamwork" = Q6.3)
输出来自
str(lpp_axis1)
是
> str(lpp_axis1)
'data.frame': 4603 obs. of 8 variables:
$ Compile.Source.Code : int 4 2 3 2 2 2 3 2 2 0 ...
$ View.Source.Code : int 4 2 1 1 2 2 3 1 1 0 ...
$ Change.Source.Code : int 4 1 0 1 2 1 2 1 1 0 ...
$ Write.Documentation : int 4 1 2 2 3 0 3 0 1 0 ...
$ File.Bug.Reports : int 4 4 1 2 2 0 2 0 0 0 ...
$ Ask.Questions : int 4 4 2 4 2 1 2 1 3 0 ...
$ Provide.Answers : int 2 4 1 4 4 0 3 1 3 0 ...
$ Overall.Participation: int 49 26 14 32 31 8 27 10 15 0 ...
输出来自
packageDescription("corrplot")
说明:
Package: corrplot
Type: Package
Title: visualization of a correlation matrix
Version: 0.30
Date: 2010-05-30
Author: Taiyun Wei
Suggests: seriation, cairoDevice, Cairo,
Maintainer: Taiyun Wei <weitaiyun@gmail.com>
Description: The corrplot package is a graphical display of a
correlation matrix, confidence interval. It also contains some
algorithms to do matrix reordering.
License: GPL-2 | GPL-3
LazyLoad: yes
URL: http://corrplot.r-forge.r-project.org
Repository: CRAN
Repository/R-Forge/Project: corrplot
Repository/R-Forge/Revision: 45
Date/Publication: 2010-05-31 07:44:14
Packaged: 2010-05-30 20:39:16 UTC; rforge
Built: R 2.11.1; ; 2011-03-19 00:22:49 UTC; unix
-- File: /home/user/R/x86_64-pc-linux-gnu-library/2.11/corrplot/Meta/package.rds
>
corrplot维护者用一个备用的corrplot.r回复了这里
使用此corrplot和下面的示例代码,文本大小是可以接受的.然而,增加它的尝试也产生相同的效果.
source("http://misterdavis.org/R_info/corrplot.r")
corrplot(cor(lpp_axis1, lpp_axis2), addn=T,
addgrid.col = "gray50", tl.cex=2, assign.col="min2max",
tl.col = "black", cl.ratio=0.4, addcolor="no",
col = colorRampPalette(c("yellow","green","blue"))(100))
使用此处可用的相关圈的早期版本,可以根据一个人的心愿调整文本.(虽然该图缺少后来更精确的corrplot包的一些功能.)cex可用于cex.我可以尝试调整这两个,以便在时间允许的情况下提出一个快乐的媒介.
使用较旧的相关圆圈脚本,以下代码生成足够大的X和Y轴标签:
circle.corr(cor(lpp_axis1, lpp_axis2), bg = "gray50", col = colorRampPalette(c("navyblue","white", "red"))(100), cex=1.5)
Rei*_*son 11
UPDATE2
实际上,由于提供了代码和数据,现在是一个真正可重现的例子:
d1 <- read.csv(url("http://misterdavis.org/r_wiki/r_results_1231_2010"))
lpp_axis1 <- with(d1, data.frame("Compile Source Code" = Q3A.1,
"View Source Code" = Q3A.2,
"Change Source Code" = Q3A.3,
"Write Documentation" = Q3A.8,
"File Bug Reports"= Q3B.3,
"Ask Questions" = Q3B.5,
"Provide Answers" = Q3B.6,
"Overall Participation" = Q3a3bConsolidated))
lpp_axis2 <- with(d1, data.frame("Identification" = Q1,
"Overall Learning" = Q6Consolidated,
"Learning Programming" = Q6.1,
"Learning about Computers" = Q6.2,
"Learning Teamwork" = Q6.3))
corrplot(cor(lpp_axis1, lpp_axis2), method=c("number"), bg = "grey10",
addgrid.col = "gray50", tl.cex=1,
tl.col = "black",
col = colorRampPalette(c("yellow","green","navyblue"))(100))
dev.new()
corrplot(cor(lpp_axis1, lpp_axis2), method=c("number"), bg = "grey10",
addgrid.col = "gray50", tl.cex=2,
tl.col = "black",
col = colorRampPalette(c("yellow","green","navyblue"))(100))
将dev.new()让你在屏幕上有两个同时来比较,不要把绘图区域分成两个小组.
这tl.offset似乎导致了更多的问题而不是值得,所以我把它排除在外.我包括以下两个数字:
同 tl.cex = 1
同 tl.cex = 2
如你所见,我无法重现你所看到的问题; tl.cex只是改变轴标签大小的大小.请注意,这是没有使用的,tl.offset但其余的绘图代码与您的相同.
这就是我得到的packageDescription():
R> packageDescription("corrplot")
Package: corrplot
Type: Package
Title: visualization of a correlation matrix
Version: 0.30
Date: 2010-05-30
Author: Taiyun Wei
Suggests: seriation, cairoDevice, Cairo,
Maintainer: Taiyun Wei <weitaiyun@gmail.com>
Description: The corrplot package is a graphical display of a
correlation matrix, confidence interval. It also contains some
algorithms to do matrix reordering.
License: GPL-2 | GPL-3
LazyLoad: yes
URL: http://corrplot.r-forge.r-project.org
Repository: CRAN
Repository/R-Forge/Project: corrplot
Repository/R-Forge/Revision: 45
Date/Publication: 2010-05-31 07:44:14
Packaged: 2010-05-30 20:39:16 UTC; rforge
Built: R 2.13.0; ; 2011-04-01 12:33:21 UTC; unix
- 文件:/home/gavin/R/libs/corrplot/Meta/package.rds
将它与您系统上的那个进行比较并尝试上面的示例,以便我们运行完全相同的代码进行比较.
原始示例 以下是可重现的示例:
require(corrplot)
data(mtcars)
corr <- cor(mtcars)
corrplot(corr, method = "number", tl.cex = 2)
更新
好的,我现在看到了问题.使用tl.offset,您可以将标签从相关图形中进一步推出边距.这似乎是一个错误的错误,corrplot()好像你没有设置tl.offset它缩放相关图形来容纳标签.我能看到的唯一解决方案是根本不设置tl.offset,或将其设置为较小的值这是一个极端的例子:
layout(matrix(1:2, ncol = 2))
corrplot(corr, method = "number", tl.cex = 2, tl.offset = 3)
corrplot(corr, method = "number", tl.cex = 2)
layout(1)
您可以通过更改绘图设备的相对尺寸来改进 - 如果在屏幕上,增加绘图设备窗口的宽度或高度(或两者),直到所有标签都可见.如果这是另一个设备(pdf()或png()说),那么您需要在创建设备时更改设备的尺寸.
原件 [可重现的例子]给出:
您不清楚x和y轴标签有什么问题,但corrplot()会改变绘图边距以容纳标签.您已通过设置参数说明了这些x和y轴标签的相对大小tl.cex = 2.如果您希望标签更大,请增加此值:
corrplot(corr, method = "number", tl.cex = 4)
如果您想要较小的标签,请设置tl.cex为较小的值:
corrplot(corr, method = "number", tl.cex = 0.8)
鉴于这些是图中唯一的x 和 y标签,这有帮助吗？如果没有,哪些标签需要改变？