Removing one deprecation warning from tibble

src/randomForest.R

@@ -18,10 +18,8 @@ color_activated = "#404080"
 
 # expressed Genes 
 expressedGenes <- list(unlist(read.csv(file = "src/database/filtered_genes_Lympho_Resting.csv")),
-                       unlist(read.csv(file = "src/database/filtered_genes_Lympho_Activated.csv")),
-                       unlist(read.csv(file = "src/database/filtered_genes_Macro_Resting.csv")),
-                       unlist(read.csv(file = "src/database/filtered_genes_Macro_Activated.csv")))
-names(expressedGenes) <- c("Lympho_Resting", "Lympho_Activated", "Macro_Resting", "Macro_Activated")
+                       unlist(read.csv(file = "src/database/filtered_genes_Lympho_Activated.csv")))
+names(expressedGenes) <- c("Lympho_Resting", "Lympho_Activated")
 
 # funtions ----------------------------------------------------------------
 plotImp <- function(model, model_name) {