Skip to content
Snippets Groups Projects
Commit b4031301 authored by Gervaise Henry's avatar Gervaise Henry :cowboy:
Browse files

Remove merge with NE which was causing error

parent fbd3525e
Branches
Tags
2 merge requests!4Merge ds,!3Merge completed D17 downsample in to develop
Hide whitespace changes
Inline Side-by-side
r.scripts/sc-TissueMapper_RUN.DS_D17.R
+ 1
− 5
View file @ b4031301
...@@ -304,13 +304,9 @@ rm(gene.set) ...@@ -304,13 +304,9 @@ rm(gene.set)
sc10x.Epi.NE <- scNE(sc10x.Epi,neg="dws",cut=opt$cut.ne) sc10x.Epi.NE <- scNE(sc10x.Epi,neg="dws",cut=opt$cut.ne)
sc10x <- SetAllIdent(object=sc10x,id="Lin")
sc10x.Epi <- SetAllIdent(object=sc10x.Epi,id="Epi.dws.sc")
sc10x.St <- SetAllIdent(object=sc10x.St,id="St.dws.sc")
sc10x <- scMerge(sc10x,sc10x.Epi,sc10x.St,i.1="Epi.dws.sc",i.2="St.dws.sc",nm="Merge_Epi.dws.sc_St.dws.sc") sc10x <- scMerge(sc10x,sc10x.Epi,sc10x.St,i.1="Epi.dws.sc",i.2="St.dws.sc",nm="Merge_Epi.dws.sc_St.dws.sc")
sc10x <- scMerge(sc10x,sc10x,sc10x.Epi.NE,i.1="Merge_Epi.dws.sc_St.dws.sc",i.2="NE",nm="Merge_Epi.dws.sc_St.dws.sc_NE") #sc10x <- scMerge(sc10x,sc10x,sc10x.Epi.NE,i.1="Merge_Epi.dws.sc_St.dws.sc",i.2="NE",nm="Merge_Epi.dws.sc_St.dws.sc_NE")
sc10x.Epi <- scMerge(sc10x.Epi,sc10x.Epi,sc10x.Epi.NE,i.1="Epi.dws.sc",i.2="NE",nm="Epi.dws.sc_NE") sc10x.Epi <- scMerge(sc10x.Epi,sc10x.Epi,sc10x.Epi.NE,i.1="Epi.dws.sc",i.2="NE",nm="Epi.dws.sc_NE")
......
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