diff --git a/r.scripts/sc-TissueMapper.R b/r.scripts/sc-TissueMapper.R
index 1f69cc19a56025655897e6666fff86fb5fb97516..ea54e0fac710cd752e2223e1017381a3d9b0fd3b 100644
--- a/r.scripts/sc-TissueMapper.R
+++ b/r.scripts/sc-TissueMapper.R
@@ -1097,9 +1097,9 @@ sc3CCA <-  function(sc10x.1,sc10x.2,sc10x.3,nm.1="D17",nm.2="D27",nm.3="D35",cc=
   genes.hvg.2 <- sc10x.2@var.genes
   genes.hvg.3 <- sc10x.3@var.genes
   genes.hvg.Comb <- unique(c(genes.hvg.1,genes.hvg.2,genes.hvg.3))
-  genes.hvg.Comb <- intersect(genes.hvg.Comb,rownames(sc10x.1@scale.data))
-  genes.hvg.Comb <- intersect(genes.hvg.Comb,rownames(sc10x.2@scale.data))
-  genes.hvg.Comb <- intersect(genes.hvg.Comb,rownames(sc10x.3@scale.data))
+  genes.hvg.Comb <- intersect(genes.hvg.Comb,rownames(sc10x.1@data))
+  genes.hvg.Comb <- intersect(genes.hvg.Comb,rownames(sc10x.2@data))
+  genes.hvg.Comb <- intersect(genes.hvg.Comb,rownames(sc10x.3@data))
   
   sc10x.1@meta.data$patient <- nm.1
   sc10x.2@meta.data$patient <- nm.2