diff --git a/code/02-bulk_comparisons.Rmd b/code/02-bulk_comparisons.Rmd index 68fc4fc..1af60ac 100644 --- a/code/02-bulk_comparisons.Rmd +++ b/code/02-bulk_comparisons.Rmd @@ -242,6 +242,21 @@ save(data_chip_stats, file = glue("{out}/data_chip_stats.Rda")) ``` +Count samples: + +```{r count_samples} + +data_chip_tidy %>% + left_join(meta %>% distinct(ID_paper, Group), by = "ID_paper") %>% + distinct(ID_paper, Group, Mark) %>% + group_by(Group, Mark) %>% + count() %>% + filter(Group %in% c("HGG-H3.1/2K27M-Pons", + "HGG-H3.3K27M-Pons", + "HGG-H3.3K27M-Thal.")) + +``` + ## Scatterplot for H3.1 vs H3.3 pons Here, we'll combine the DGE data with each of different source of ChIP-seq analysis, diff --git a/code/02-bulk_comparisons.html b/code/02-bulk_comparisons.html index 5c23dc5..2010ecb 100644 --- a/code/02-bulk_comparisons.html +++ b/code/02-bulk_comparisons.html @@ -190,7 +190,7 @@
Count samples:
+data_chip_tidy %>%
+ left_join(meta %>% distinct(ID_paper, Group), by = "ID_paper") %>%
+ distinct(ID_paper, Group, Mark) %>%
+ group_by(Group, Mark) %>%
+ count() %>%
+ filter(Group %in% c("HGG-H3.1/2K27M-Pons",
+ "HGG-H3.3K27M-Pons",
+ "HGG-H3.3K27M-Thal."))
+This document was last rendered on:
-## 2022-09-08 15:08:33
+## 2022-10-18 14:17:13
The git repository and last commit:
## Local: master /lustre06/project/6004736/sjessa/from_narval/HGG-oncohistones/public
## Remote: master @ origin (git@github.com:fungenomics/HGG-oncohistones.git)
-## Head: [4101e76] 2022-09-08: Update README.md
+## Head: [8082a4d] 2022-10-18: Merge branch 'master' of github.com:fungenomics/HGG-oncohistones
The random seed was set with set.seed(100)
The R session info:
## Error in get(genname, envir = envir) : object 'testthat_print' not found
@@ -514,7 +528,7 @@ The resources requested when this document was last rendered:
## #SBATCH --time=01:00:00
## #SBATCH --cpus-per-task=1
-## #SBATCH --mem=10G
+## #SBATCH --mem=20G