14

我需要帮助来解释使用 corrplot 的错误消息。

这是我的脚本

install.packages("ggplot2")
install.packages("corrplot")
install.packages("xlsx")

library(ggplot2)
library(corrplot)
library(xlsx)

#set working dir
setwd("C:/R")
#read xlsx data into R
df <- read.xlsx("TP_diff_frame.xlsx",1)
#set column as index
rownames(df) <- df$country
#remove column
df2<-subset(df, select = -c(country) )
#round values to to decimals


corrplot(df2, method="shade",shade.col=NA, tl.col="black", tl.srt=45)

我的df2：

> df2
                     a    b     c     d     e    f    g
Sweden            0.09 0.19  0.00 -0.25 -0.04 0.01 0.00
Germany           0.11 0.19  0.01 -0.35  0.01 0.02 0.01
UnitedKingdom     0.14 0.21  0.03 -0.32 -0.05 0.00 0.00
RussianFederation 0.30 0.26 -0.07 -0.41 -0.09 0.00 0.00
Netherlands       0.09 0.16 -0.05 -0.26  0.02 0.02 0.01
Belgium           0.12 0.20  0.01 -0.34  0.01 0.00 0.00
Italy             0.14 0.22  0.01 -0.37  0.00 0.00 0.00
France            0.14 0.24 -0.04 -0.34  0.00 0.00 0.00
Finland           0.16 0.17  0.01 -0.26 -0.08 0.00 0.00
Norway            0.15 0.21  0.10 -0.37 -0.09 0.00 0.00

和错误信息：

> corrplot(df2, method="shade",shade.col=NA, tl.col="black", tl.srt=45)

矩阵中的错误（unlist（value，recursive = FALSE，use.names = FALSE），nrow = nr，：'dimnames' [2] 的长度不等于数组范围

4

3 回答 3

37

我认为问题在于您正在绘制数据框而不是相关矩阵。尝试将最后一行更改为：

corrplot(cor(df2), method="shade",shade.col=NA, tl.col="black", tl.srt=45)

函数 cor 计算相关矩阵，这是您需要绘制的

于 2014-01-15T15:42:46.990 回答
3

另一种选择是将其分成两行代码。

df2 <- cor(df, use = "na.or.complete")
corrplot(df2, method="shade",shade.col=NA, tl.col="black", tl.srt=45)

我会运行一个简单的 corrplot（例如 corrplot.mixed(df2)）确保它可以工作，然后进行微调和美学。

于 2014-06-01T17:19:05.170 回答
3

为了将corrplot包用于热图，您应该将您的传递data.frame给 amatrix并使用is.corr参数。

df2 <- as.matrix(df2)

corrplot(df2, is.corr=FALSE)
于 2016-07-12T20:13:32.583 回答