成都创新互联网站制作重庆分公司

R语言单元格为方块的热图举例分析

这篇文章主要讲解了“R语言单元格为方块的热图举例分析”,文中的讲解内容简单清晰,易于学习与理解,下面请大家跟着小编的思路慢慢深入,一起来研究和学习“R语言单元格为方块的热图举例分析”吧!

创新互联公司专注于两当网站建设服务及定制,我们拥有丰富的企业做网站经验。 热诚为您提供两当营销型网站建设,两当网站制作、两当网页设计、两当网站官网定制、成都微信小程序服务,打造两当网络公司原创品牌,更为您提供两当网站排名全网营销落地服务。

R语言单元格为方块的热图举例分析  
image.png

我选择使用R语言的ggplot2来实现,这个是箱线图和热图的拼接,右侧的热图可以借助geom_point()函数实现,将点的形状改为正方块,数值按照正负来映射颜色,按照一定的数值来映射大小。

 首先构造一份数据集
set.seed("20200407")
x<-seq(-1,1,by=0.001)
df<-data.frame(matrix(sample(x,90),nrow = 6))
head(df)
colnames(df)<-paste0("Y",1:15)
rownames(df)<-paste0("X",1:6)
write.csv(df,file = "20210407_example.csv",quote = F)
 
R语言单元格为方块的热图举例分析  
image.png

这样是宽格式数据,ggplot2作图需要整理成长格式

df<-read.csv("20210407_example.csv",header=T)
head(df)
df1<-reshape2::melt(df,id.vars="Sample")
head(df1)
 
R语言单元格为方块的热图举例分析  
image.png
 构造数据
library(dplyr)
df1%>%
  mutate(group_1 = case_when(
    value <= 0 ~ "A",
    TRUE ~ "B"
  ))%>%
  mutate(group_2=case_when(
    value >= -1 & value < -0.7 ~ "[-1,-0.7)",
    value >= -0.7 & value < -0.5 ~ "[-0.7,-0.5)",
    value >= -0.5 & value < -0.3 ~ "[-0.5,-0.3)",
    value >= -0.3 & value <= 0 ~ "[-0.3,0]",
    value > 0 & value <= 0.3 ~ "(0,0.3)",
    value > 0.3 & value <= 0.5 ~ "(0.3,0.5]",
    value > 0.5 & value <= 0.7 ~ "(0.5,0.7]",
    value > 0.7 & value <= 1 ~ "(0.7,1]",
  ))%>%
  mutate(value_1=case_when(
    value >= -1 & value < -0.7 ~ -0.8,
    value >= -0.7 & value < -0.5 ~ -0.6,
    value >= -0.5 & value < -0.3 ~ -0.4,
    value >= -0.3 & value <= 0 ~ -0.2,
    value > 0 & value <= 0.3 ~ 0.2,
    value > 0.3 & value <= 0.5 ~ 0.4,
    value > 0.5 & value <= 0.7 ~ 0.6,
    value > 0.7 & value <= 1 ~ 0.8,
  )) -> df2
   构造数据用于添加线段
df3<-data.frame(
  x = seq(1.5,5.5,1),
  xend = seq(1.5,5.5,1),
  y = -Inf,
  yend = Inf
)
df3
df4<-data.frame(
  x = -Inf,
  xend = Inf,
  y = seq(1.5,14.5,1),
  yend = seq(1.5,14.5,1)
)
   画图
library(ggplot2)
ggplot(data=df2,aes(x=Sample,y=variable))+
  geom_point(aes(size=abs(value_1),
                 color=factor(value_1)),
             shape=15)+
  scale_color_manual(values = c(rep("#fe0000",4),rep("#009ccc",4)))+
  theme_bw()+
  theme(panel.grid = element_blank(),
        panel.border = element_rect(color="grey"),
        axis.ticks = element_blank())+
  geom_segment(data=df3,aes(x=x,xend=xend,y=y,yend=yend),
               color="grey")+
  geom_segment(data=df4,aes(x=x,xend=xend,y=y,yend=yend),
               color="grey")+
  scale_size_continuous(range = c(2,10))+
  scale_y_discrete(position = "right")+
  labs(x=NULL,y=NULL)
 
R语言单元格为方块的热图举例分析  
image.png

这里遇到的问题是如何让图例想推文开头的图片一样:一个图例就能够既反映大小又有颜色呢?而且图例的排布是从打到小然后又从小到大。这个如何用代码实现呢?暂时不知道了,手动编辑吧,可能得费一些时间

R语言单元格为方块的热图举例分析  
image.png

感谢各位的阅读,以上就是“R语言单元格为方块的热图举例分析”的内容了,经过本文的学习后,相信大家对R语言单元格为方块的热图举例分析这一问题有了更深刻的体会,具体使用情况还需要大家实践验证。这里是创新互联,小编将为大家推送更多相关知识点的文章,欢迎关注!


本文名称:R语言单元格为方块的热图举例分析
当前地址:http://cxhlcq.com/article/psgosp.html

其他资讯

在线咨询

微信咨询

电话咨询

028-86922220(工作日)

18980820575(7×24)

提交需求

返回顶部