1 2# load("./data/test_data.rda",package="scImmuCC") 3data("./data/test_data.rda",package="scImmuCC") 4test_data <- as.matrix(test_data) 5test <- scImmuCC_Layered(test_data,Non_Immune=FALSE)