R corrplot - 获得小的压缩图

Question

我正在尝试使用 corrplot 函数从相关矩阵绘制相关图。

但是我得到了一个压缩的和不可读的情节。此外，绘图是在窗口的最右端生成的。扩展 ggplot 图的方法在这里不起作用。

> col <- colorRampPalette(c("#BB4444", "#EE9988", "#FFFFFF", "#77AADD", "#4477AA"))
> corrplot(correlation_matrix, method="color", col=col(200),  
          type="upper", order="hclust", 
          addCoef.col = "black", # Add coefficient of correlation
          tl.col="black", tl.srt=45, #Text label color and rotation
          # hide correlation coefficient on the principal diagonal
          diag=FALSE 
 )

这是生成的图

Answer 1

正如上面有人建议的那样，您应该修复您拥有的名称或更改绘图的参数。我将使用 ggcorrplot 代替，因为我发现它更易于使用(并且更好看)，但插图将显示相同的问题。如果我将 airquality 数据的名称换成像这样可怕的名称并绘制出来:

#### Libraries ####
library(tidyverse)
library(ggcorrplot)

#### Change Data Names ####
bad.names <- airquality %>% 
  rename(Approximate_Ozone_Measurement_in_Some_Measure = Ozone,
         Solar_Radiation_Based_On_Sun_Movements = Solar.R,
         Wind_Barometer_Ratings_And_Such = Wind,
         Temperature_In_Fahrenheit_To_Nearest_Degree = Temp)

#### Run Correlation ####
bad.corr <- bad.names %>% 
  correlation()

#### Plot ####
ggcorrplot(bad.corr)

你得到这样的东西:

有两种解决方法...要么重命名您的变量，要么以某种方式旋转名称以固定角度以使其可读。像这样荒谬的名字更容易简单地修复它们而不是人为地挤压它们:

#### Fix Names ####
good.names <- bad.names %>% 
  rename(Ozone= Approximate_Ozone_Measurement_in_Some_Measure,
         Solar.R = Solar_Radiation_Based_On_Sun_Movements,
         Wind = Wind_Barometer_Ratings_And_Such,
         Temp = Temperature_In_Fahrenheit_To_Nearest_Degree)

#### Run Correlation ####
good.corr <- good.names %>% 
  correlation()

#### Replot ####
ggcorrplot(good.corr,
           lab = T,
           type = "lower")