Skip to content

Commit

Permalink
minor
Browse files Browse the repository at this point in the history
  • Loading branch information
wbaopaul committed May 23, 2020
1 parent f5ff896 commit 9c04c31
Showing 1 changed file with 0 additions and 4 deletions.
4 changes: 0 additions & 4 deletions scripts/src/dsAnalysis_utilities.R
Original file line number Diff line number Diff line change
Expand Up @@ -160,8 +160,6 @@ doBasicSeurat_new <- function(mtx, npc = 50, top_variable_features = 0.2,
reg.var = NULL, norm_by = 'log', project = 'scATAC'){

# top.variabl -- use top most variable features
rnames = rownames(mtx)
rownames(mtx) = sapply(rnames, function(x) gsub('__', '-', x, fixed = T))
seurat.obj = CreateSeuratObject(mtx, project = project, assay = assay,
names.delim = '-')

Expand All @@ -183,8 +181,6 @@ doBasicSeurat_new <- function(mtx, npc = 50, top_variable_features = 0.2,
verbose = FALSE, seed.use = 10, npc = npc)
if(length(reg.var) > 0 ) seurat.obj = regress_on_pca(seurat.obj, reg.var)

# seurat.obj <- RunLSI(seurat.obj, n = npc,
# features = VariableFeatures(object = seurat.obj))

return(seurat.obj)
}
Expand Down

0 comments on commit 9c04c31

Please sign in to comment.