R-更改corrplot轴标签的大小

R-更改corrplot轴标签的大小,r,plot,font-size,correlation,r-corrplot,R,Plot,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 = colorRa

我将以下内容与
corrplo
t一起使用:

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)

来自

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软件包的一些功能。)cex可用于cex。在时间允许的情况下,我可能会尝试调整这两个因素,以找到一个快乐的媒介

使用较旧的关联圆脚本,以下代码生成足够大的X轴和Y轴标签:

circle.corr(cor(lpp_axis1, lpp_axis2), bg = "gray50",   col = colorRampPalette(c("navyblue","white", "red"))(100), cex=1.5)

<>你可以尝试用Par改变文本的点大小。我认为默认大小是12。

corrplot
之前添加类似于
par(ps=14)
的行应该会使文本变大。

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))
--文件:/home/gavin/R/libs/corrplot/Meta/package.rds

将其与系统上的代码进行比较,然后尝试上面的示例,以便我们运行完全相同的代码进行比较


原始示例 以下是一个可复制的示例:

require(corrplot)
data(mtcars)
corr <- cor(mtcars)
corrplot(corr, method = "number", tl.cex = 2)
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()
say),则在创建设备时需要更改设备的尺寸


原版[可复制示例]给出:

您不清楚x轴和y轴标签有什么问题,但
corrplot()
会更改打印边距以适应标签。您已经通过设置argument
tl.cex=2
说明了这些x轴和y轴标签的相对大小。如果希望标签更大,请增加此值:

corrplot(corr, method = "number", tl.cex = 4)

如果需要较小的标签,请将
tl.cex
设置为较小的值:

corrplot(corr, method = "number", tl.cex = 0.8)


鉴于这些是绘图上唯一的xy标签,这有帮助吗?如果没有,哪些标签需要更改?

根据您添加的示例,您可能需要增加绘图的尺寸并设置外部边距以适应标签的长度

可以使用
par()$pin
访问当前打印尺寸,使用
par()$omi
访问外部边距

通过调整以下示例,可以更改打印尺寸和外部边距:

require("corrplot")         ## needs the corrplot package  
data(mtcars)  
  corr <- cor(mtcars)    
par(pin=c(7,7))              ##  (width, height) in inches    
par(omi=c(0,1,1,0.5))        ## (bottom, left, top, right)  in inches  
corrplot(corr, method="number", tl.cex = 2)
require(“corrplot”)需要corrplot包
数据(mtcars)

corr您能解释一下您要更改的x/y轴标签吗?一个可复制的例子会有所帮助。这里有一个:
数据(mtcars);corr将影响所有文本,@Donnied只想更改一些标签。。在这一点上,如果我能改变我试图改变的文本,我可能会很高兴。当我改变TL.CEX——它改变了所有的东西,但是我想改变的标签,PARR(Ps=12)+CORTRAP(Cor(LPPYAXIS1,LPPYAXIS2),方法=C(“数字”),TL.CEX=2)创建[URL=这个PAR(PS=14)]也是如此。使用较旧的脚本;但是,它写在图形上。@Gavin Simpson-这是它应该使用的方式。但是,更改tl.cex会更改除我试图更改的标签以外的所有内容。使用corrplot(cor(lpp_axis1,lpp_axis2),method=c(“number”),tl.cex=4)另一个文本增加,但x轴和y轴上的文本仍然很小。@Donnied您正在运行CRAN的最新版本吗?即0.30。packageDescription(“corrplot”)$version说了什么?@Donnied抱歉,它应该是
$version
,带大写字母
V
。请尝试:
packageDescription(“corrplot”)$Version
。但问题是,我运行的是最新版本的
corrplot
,它确实适用于我,并且如文档所述,因此您/我们需要找出原因。它显示为0.30。我在Debian上运行它,但这不应该改变任何事情。@Gavin-它是否与我用作轴的数据帧有任何关系?但这仅限于此因为@Donnied的呼叫中的
tl.offset
。@Donnied声称,并在我回答的评论中的图像中显示,
tl.cex
正在增加除变量标签以外的所有内容的大小。@Gavin-感谢您指出这一点。我希望@David的回答能够改善这种情况;但是,文本仍然很小。
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)
corrplot(corr, method = "number", tl.cex = 4)
corrplot(corr, method = "number", tl.cex = 0.8)
require("corrplot")         ## needs the corrplot package  
data(mtcars)  
  corr <- cor(mtcars)    
par(pin=c(7,7))              ##  (width, height) in inches    
par(omi=c(0,1,1,0.5))        ## (bottom, left, top, right)  in inches  
corrplot(corr, method="number", tl.cex = 2)