byarielm.fyi
+10
-8
R/scImmuCC_main.R
+10
-8
R/scImmuCC_main.R
···
19
19
20
20
ssgsea <- ssgseaParam(
21
21
count,
22
-
genelist,
23
-
assay = NA_character_,
24
-
annotation = NA_character_,
25
-
minSize = 1,
26
-
maxSize = Inf,
27
-
alpha = 0.25,
28
-
normalize = TRUE
29
-
)
22
+
genelist
23
+
)
24
+
#,
25
+
#assay = NA_character_,
26
+
#annotation = NA_character_,
27
+
#minSize = 1,
28
+
#maxSize = Inf,
29
+
#alpha = 0.25,
30
+
#normalize = TRUE
31
+
#)
30
32
31
33
ssgsea_score <- gsva(ssgsea)
32
34
##ssgsea_score = gsva(count, genelist, method = "ssgsea", ssgsea.norm = TRUE, verbose = TRUE) # signature 'matrix,list'