+1
-1
R/seurat_maps.R
+1
-1
R/seurat_maps.R
···
35
35
if(cells>50){
36
36
seurat.data <- RunPCA(seurat.data, features = VariableFeatures(object = seurat.data))
37
37
}else{
38
-
seurat.data <- RunPCA(seurat.data,npcs = cells-1, features = VariableFeatures(object = seurat.data))
38
+
seurat.data <- RunPCA(seurat.data,npcs = (cells-1), features = VariableFeatures(object = seurat.data))
39
39
}
40
40
41
41
head(seurat.data@reductions$pca@cell.embeddings)