Calculates immune phenotype scores from gene expression data.
Examples
if (FALSE) { # \dontrun{
ips_genes <- load_data("ips_gene_set")
if (!is.null(ips_genes)) {
set.seed(123)
sim_eset <- matrix(rnorm(nrow(ips_genes) * 2), nrow(ips_genes), 2)
rownames(sim_eset) <- ips_genes$GENE
colnames(sim_eset) <- paste0("Sample", 1:2)
result <- deconvo_ips(eset = sim_eset, project = "Example")
if (!is.null(result)) head(result)
}
} # }