Skip to content
Snippets Groups Projects
Commit b1066e7a authored by Gael  MILLOT's avatar Gael MILLOT
Browse files

Licence file added

parent 35e06bf2
No related branches found
No related tags found
No related merge requests found
This diff is collapsed.
......@@ -1507,7 +1507,7 @@ if(any(quanti.in.recov.var)){
}
quali.recov.var <- recov.var[ ! quanti.in.recov.var]
if(length(quali.recov.var) == 0){
stop(paste0("\n\n============\n\nERROR: AT LEAST ONE QUALITITATIVE VARIABLE MUST BE PRESENT AS PREDICTIVE VARIABLE IN THE model1, model2, model3 PARAMETERS TO RUN AN ANOVA\n\n============\n\n"), call. = FALSE)
stop(paste0("\n\n============\n\nERROR: AT LEAST ONE QUALITITATIVE VARIABLE MUST BE PRESENT AS PREDICTIVE VARIABLE IN THE model1, model2, model3 PARAMETERS TO RUN AN ANOVA.\nCHECK IF QUALI VARIABLES ARE ONLY MADE ON NUMBERS (RECOGNIZED AS QUANTI VARIABLE).\n\n============\n\n"), call. = FALSE)
}
if( ! is.null(model1)){
quali.recov.var1 <- recov.var1[recov.var1 %in% quali.recov.var]
......
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