Commit 2c505548 authored by Lena Hersemann's avatar Lena Hersemann

added test to check whether the required cluster_comp_folder exists

parent d860e90f
......@@ -25,12 +25,15 @@ load_pack(Seurat)
# Determine data directory from execution context ---------------------------------------------------------------------
dataPath= paste0(args[1], "cluster_comp_data")
#dataPath = "."
#dataPath = "./cluster_comp_data"
#TODO: try Normalized Mutual Information and Rand Index as a measures for cluster comparison
# LOAD data ------------------------------------------------------------------------------------------------------------
#check presence of the required data folder
if (!dir.exists(dataPath)) { stop("required cluster_comp_folder not found") }
# check presence of all required data
all_files <- list.files(dataPath, pattern = ".txt")
files_req <- c("cluster_info", "cluster_marker_genes", "scaled_counts", "tsne_info")
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment