使用ggplot2绘制带星号的热图

最新推荐文章于 2024-07-19 07:01:13 发布

小杜的生信筆記

最新推荐文章于 2024-07-19 07:01:13 发布

阅读量417

点赞数 3

分类专栏： R语言精美图形绘制教程文章标签：数据库热图差异热图富集分析生物信息学

本文链接：https://blog.csdn.net/kanghua_du/article/details/137014579

版权

原文链接：使用ggplot2绘制带星号"*"的热图

本期教程内容

绘制教程

导入相关的R包

###'@导入相关的R包
library(readxl)
library(tidyverse)
library(readxl)
library(ggsci)
library(viridis)
library(RColorBrewer)

导入数据

corr_data <- read_excel("20240325_input.xlsx",sheet = "Sheet1")
corr_data[1:5,1:10]

> corr_data[1:5,1:10]
# A tibble: 5 × 10
  Conjugation Taxa            visit estimate statistic p.value method                         alternative    fdr p_label
  <chr>       <chr>           <chr>    <dbl>     <dbl>   <dbl> <chr>                          <chr>        <dbl> <chr>  
1 Ala         Bacteroides     0-4D    0.151    168508.  0.122  Spearman's rank correlation r… two.sided   0.285  NA     
2 Ala         Bacteroides     1M     -0.223    278640.  0.0189 Spearman's rank correlation r… two.sided   0.0882 NA     
3 Ala         Bacteroides     12M    -0.134    231518.  0.169  Spearman's rank correlation r… two.sided   0.311  NA     
4 Ala         Bifidobacterium 0-4D   -0.0359   205606.  0.715  Spearman's rank correlation r… two.sided   0.834  NA