我需要使用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,递归= FALSE,use.names = FALSE),nrow = nr,:
'dimnames'[2]的长度不等于数组范围
最佳答案
我认为问题在于您正在绘制数据帧而不是相关矩阵。尝试将最后一行更改为此:
corrplot(cor(df2), method="shade",shade.col=NA, tl.col="black", tl.srt=45)
函数cor计算相关矩阵,这是您需要绘制的