# Define file paths for tumor and normal data from the data folder
tumor_file <- system.file("extdata",
"removebatch_SKCM_Skin_TCGA_exp_tumor_test.rds",
package = "TransProR")
normal_file <- system.file("extdata",
"removebatch_SKCM_Skin_Normal_TCGA_GTEX_count_test.rds",
package = "TransProR")
output_file <- file.path(tempdir(), "DEG_limma_voom.rds")
DEG_limma_voom <- limma_analyze(
tumor_file = tumor_file,
normal_file = normal_file,
output_file = output_file,
logFC_threshold = 2.5,
p_value_threshold = 0.01
)
# View the top 5 rows of the result
head(DEG_limma_voom, 5)
Run the code above in your browser using DataLab