diff --git a/r.scripts/sc-TissueMapper_RUN.Pd.R b/r.scripts/sc-TissueMapper_RUN.Pd.R
index cda01c1cfe464a503f3b246e2743f400cdf5645a..c68ab80d58731409d860799ec19763e8c85ffd13 100644
--- a/r.scripts/sc-TissueMapper_RUN.Pd.R
+++ b/r.scripts/sc-TissueMapper_RUN.Pd.R
@@ -409,8 +409,8 @@ scTables(sc10x,i.1="Merge_Epi.dws_St.go_NE",i.2="Merge_Epi.dws_St.go")
 
 genes.deg.Stress <- scDEG(sc10x.Stress,i="Stress",g.1="Stress",g.2="ALL",pct=0.5,t=5)
 
-genes.deg.Epi <- scDEG(sc10x,i="Lin",g.1="Epi",g.2="St",t=2)
-genes.deg.St <- scDEG(sc10x,i="Lin",g.1="St",g.2="Epi",t=2)
+genes.deg.Epi <- scDEG(sc10x,i="Lin",g.1="Epi",g.2="St",pct=0.75,t=2)
+genes.deg.St <- scDEG(sc10x,i="Lin",g.1="St",g.2="Epi",pct=0.75,t=2)
 
 genes.deg.BE <- scDEG(sc10x.Epi.NE,i="Epi.dws.sub",g.1="BE",g.2=c("LE","OE1","OE2"),pct=0.25,t=2)
 genes.deg.LE <- scDEG(sc10x.Epi.NE,i="Epi.dws.sub",g.1="LE",g.2=c("BE","OE1","OE2"),pct=0.25,t=2)