From 69739b22331fdd971b96375abe762331665bf16f Mon Sep 17 00:00:00 2001
From: "Gervaise H. Henry" <gervaise.henry@utsouthwestern.edu>
Date: Sun, 18 Nov 2018 15:50:39 -0600
Subject: [PATCH] Use all cells for lung liniage QuSAGE
---
r.scripts/sc-TissueMapper_RUN.Pd.R | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/r.scripts/sc-TissueMapper_RUN.Pd.R b/r.scripts/sc-TissueMapper_RUN.Pd.R
index f55a0bd..43ddd25 100644
--- a/r.scripts/sc-TissueMapper_RUN.Pd.R
+++ b/r.scripts/sc-TissueMapper_RUN.Pd.R
@@ -387,7 +387,7 @@ gene.set <- c(gene.set,gene.set1)
rm(gene.set1)
rm(gene.orthog)
gene.set <- lapply(gene.set,droplevels)
-results.cor.Epi.MusLungHierarchy <- scQuSAGEsm(sc10x.Epi,gs=gene.set,ds=min.epi,nm="Epi.dws.sub_NE",folder="MusLungHierarchy")
+results.cor.Epi.MusLungHierarchy <- scQuSAGEsm(sc10x.Epi,gs=gene.set,ds=0,nm="Epi.dws.sub_NE",folder="MusLungHierarchy")
rm(gene.set)
gene.set.c2.all <- read.gmt("./genesets/c2.all.v6.1.symbols.gmt")
--
GitLab