Commit 3850ff23 authored by Giorgia Giacomini's avatar Giorgia Giacomini
Browse files

Update Figure_5b.R

parent 1e116618
...@@ -8,7 +8,7 @@ library(pheatmap) ...@@ -8,7 +8,7 @@ library(pheatmap)
library(Seurat) library(Seurat)
# Loads the GSEA results from an RDS file # Loads the GSEA results from an RDS file
gsea_res <- readRDS("/beegfs/scratch/ric.gregori/ric.gregori/Infertility/object/gsea_intracluster_OAT_NOA_vs_FER.rds") gsea_res <- readRDS("gsea_intracluster_OAT_NOA_vs_FER.rds")
# Removes comparisons between NOA and OAT # Removes comparisons between NOA and OAT
index<- c(3, 6 ,9 ,12, 15, 18, 21, 24, 27) index<- c(3, 6 ,9 ,12, 15, 18, 21, 24, 27)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment