ggcorr函数带你绘制不一样的相关系数图

欢迎关注R语言数据分析指南

❝

本节来介绍如何使用「GGally」包自带的函数来绘制相关性系数图，虽然「corrplot」很是强大但是相关的R包也算有一定的可取之处。下面就来通过一个小案例介绍，「数据+代码已经上传2023VIP群，加群的观众老爷请自行下载」

❞

加载R包

library(tidyverse)
library(GGally)           

数据清洗

df <- read_tsv("data.xls")

df_named <- df[,11:22] %>% 
  dplyr::rename("HomeShots"=HS,
         "AwayShots"=AS,
         "HomeShots-on-Target"=HST,
         "AwayShots-on-Target"=AST,
         "HomeFouls"=HF,
         "AwayFouls"=AF,
         "HomeCorners"=HC,
         "AwayCorners"=AC,
         "HomeYellowCards"=HY,
         "AwayYellowCards"=AY,
         "HomeRedCards"=HR,
         "AwayRedCards"=AR)
           

数据可视化

ggcorr(df_named, method = c("pairwise"),  # 使用pairwise方法计算相关系数矩阵
       geom = "circle", max_size = 15,  # 使用圆形表示相关系数
       min_size = 5, nbreaks = 6,  # 设置相关系数的大小范围和分段数
       angle = 0,  # 设置圆形的角度
       palette = "RdYlBu",  # 设置调色板为红黄蓝
       hjust = 1, size = 4, color = "grey50",  # 设置相关系数标签的位置、大小和颜色
       layout.exp = 0.5,  # 设置相关系数标签的位置展示方式
       name = expression(rho)) +  # 设置相关系数标签的名称为ρ
  geom_point(size = 10, aes(color = coefficient > 0, 
                            alpha = abs(coefficient) > 0.5)) +  # 使用点表示系数大于0且绝对值大于0.5的相关系数，设置点的大小和颜色
  scale_alpha_manual(values = c("TRUE" = 0.25, "FALSE" = 0)) +  # 设置alpha值的映射关系，当系数满足条件时设置透明度为0.25，否则为0
  guides(alpha = FALSE) +  # 不显示alpha的图例
  theme(plot.margin = margin(0, 0, 0, 0, "pt"),  # 设置图的边距
        legend.background = element_blank(),  # 不显示图例的背景
        legend.spacing.x = unit(0, "cm"))  # 设置图例水平间距为0cm
           

❝

有需要学习个性化数据可视化的朋友，欢迎到小编的「淘宝店铺」 「R语言数据分析指南」购买「2023年度会员」 初始价格99元，内容主要包括各种「高分论文的图表分析复现以及一些个性化图表的绘制」均包含数据+代码；按照往年数据小编年产出约在150+以上

❞

购买后微信发小编订单截图即邀请进新的会员交流群，小编的文档为按年售卖，只包含当年度的「除系列课程外」的文档，有需要往年文档的朋友也可下单购买，需要了解更多信息的朋友欢迎交流咨询.

2023会员群精彩内容