相关性曲线图及相关性热图

最新推荐文章于 2024-04-28 10:11:31 发布

植保小萌新

最新推荐文章于 2024-04-28 10:11:31 发布

阅读量1k

点赞数 1

CC 4.0 BY-SA版权

文章标签： excel

本文链接：https://blog.csdn.net/qq_72899974/article/details/130022957

该文展示了使用R语言进行数据读取，包括readxl和read.csv函数，以及利用ggplot2进行数据可视化，特别是ggpairs函数创建散点图矩阵。此外，还详细阐述了如何用corrplot库进行相关性分析，包括热图的绘制和聚类处理，强调了显著性水平的设定。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >



# 加载 readxl 包
library(readxl)

# 读取 xlsx 文件
df<-read.csv("Seed_Data.csv")
df <- read_excel("XG.xlsx")
df <- read_excel("random_forest.xlsx",sheet = 'line_XG2')
#（更正一下，先加载包再读入表格数据，其中read后面是下划线，不是点点）
head(df)

#install.packages("GGally")
library("GGally")
#ggpairs(df,columns = 1:21) 
#ggpairs(df,columns = 1:7) 
ggpairs(df,columns = 1:8) 
df$target<-factor(df$target)
cols<-c("steelblue","yellowgreen","violetred1")
p<-ggpairs(df,
           columns = 1:8,
           aes(color=target))+
  scale_color_manual(values = cols)+
  scale_fill_manual(values = cols)+
  theme_bw()+
  theme(axis.text = element_text(colour = "black",
                                 size = 11),
        strip.background = element_rect(colour = "white",
                                        size=12),
        strip.text = element_text(face="bold"))
print(p)http://127.0.0.1:12819/graphics/plot_zoom_png?width=1463&height=844



#........................相关性分析..........
# 加载 r