Commit 5612e5f4 authored by Venkat Malladi's avatar Venkat Malladi

compare Basal vs E2 condition.

parent 2c44ab63
......@@ -715,3 +715,15 @@ allsnotx_e2_rpkm$tx_name <- as.character(gencode_sn_mapping[sn_inx,"V4"])
allsnotx_e2_rpkm$gene_name <- as.character(gencode_sn_mapping[sn_inx,"V3"])
write.table(allsnotx_e2_rpkm, file="mcf-7-e2-snRNA_RPKM_1_FC_2.tsv", quote=F, sep="\t", row.names=F, col.names=T)
```
# Overlap of snoRNA and snRNA
``` {r snoRNA Overlap}
# Overlap (A)
basal_unique <- unique(mlk_gr_snotx$tx_name)
e2_unique <- unique(mlke_gr_snotx$tx_name)
overlap <- calculate.overlap(x = list("Basal" = basal_unique,"E2" = e2_unique))
jpeg('venndigram_basal_E2_snoRNA.jpg')
draw.pairwise.venn(area1 = length(overlap$a1), area2 = length(overlap$a2), cross.area = length(overlap$a3),col = c("royalblue4", "seagreen4"),lwd=4)
dev.off()
```
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