From f08a05b26385b02d87eaa4c16f42053bd9b2dffe Mon Sep 17 00:00:00 2001 From: Sigit Date: Wed, 31 Mar 2021 21:07:12 +0800 Subject: [PATCH] Update CentrifugeData.R --- CentrifugeData.R | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/CentrifugeData.R b/CentrifugeData.R index 376c3d3..6614085 100644 --- a/CentrifugeData.R +++ b/CentrifugeData.R @@ -13,12 +13,12 @@ AddAugmentedAssay<- function(seu, return(seu) } -CentrifugeData <- function(sub){ +CentrifugeData <- function(sub,meta.data.features){ tic("generating new assay") sub <- NormalizeData(sub, normalization.method="LogNormalize", scale.factor=10000) sub <- FindVariableFeatures(sub, selection.method = "vst", nfeatures = 2000) sub <- ScaleData(sub, features=VariableFeatures(sub)) - sub <- AddAugmentedAssay(sub) + sub <- AddAugmentedAssay(sub,meta.data.features) DefaultAssay(sub)<-"AugRNA" sub <- RunPCA(sub, npcs=30, features=VariableFeatures(sub,assay="AugRNA"),verbose=FALSE)