Add data loads to DPr diy

r.scripts/sc-TissueMapper_RUN.D.diy.R

+load("./analysis/sc10x.Rda")
+load("./analysis/sc10x.Stress.Rda")
+load("./analysis/sc10x.Epi.Rda")
+load("./analysis/sc10x.St.Rda")
+load("./analysis/Data.RData")
+load("./analysis/DEG.Rda")
+
 sctSNECustCol(sc10x,i="Lin",bl="Epi",rd="St",file="Aggr")
 sctSNECustCol(sc10x,i="Merge_Epi.dws.sc_St.dws.sc",bl=c("BE","LE","OE_SCGB","OE_KRT13"),rd=c("Fib","SM","Endo","Leu"),file="Aggr")
 sctSNECustCol(sc10x.Epi,i="Epi.dws.sc",bl=c("BE","LE","OE_SCGB","OE_KRT13"),rd="",file="Aggr")