From f37e67f9dd0fd8dd0a613bc4d94f54dc2bcc839f Mon Sep 17 00:00:00 2001 From: Laurent Modolo <laurent@modolo.fr> Date: Thu, 25 Oct 2018 16:50:41 +0200 Subject: [PATCH] project.R: fix blancks problem in anova --- R/project.R | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/R/project.R b/R/project.R index 7f3c905..1955d9a 100644 --- a/R/project.R +++ b/R/project.R @@ -67,7 +67,10 @@ analysis <- function(data_path = "data/") { set_data <- set_analysis(paste0(data_path, "/", folder), meta = T) set_data$set <- folder - set_data$drug <- paste0(set_data$drug, "_", folder) + set_data$drug <- ifelse(set_data$drug %in% "None", + "None", + paste0(set_data$drug, "_", folder) + ) if (length(min_sets_factors) == 0) { min_sets_factors <- colnames(set_data) } -- GitLab