Skip to content

GitLab

Commit 01843f6c authored by Carine Rey's avatar Carine Rey
Browse files

change change to scaling

parent a3d6a487
Hide whitespace changes
Inline Side-by-side
Showing with 3 additions and 3 deletions
lib/scripts/calc_t_per_meth.R
View file @ 01843f6c
......@@ -830,11 +830,11 @@ plot_out = function(df_out, df_d , df_auc, df_recall_sup09_per_meth, meths = NUL
if (all(couple_simuB%in%tmp_df$couple)) {
tmp_df$group[tmp_df$couple%in%couple_simuB] = "2/ CCSE"
tmp_df$group[tmp_df$couple%in%couple_simuB] = "2/ CSSE"
tmp_df2 = rbind(tmp_df2,tmp_df[tmp_df$couple%in%couple_simuB,])
}
if (all(couple_simuC%in%tmp_df$couple)) {
tmp_df$group[tmp_df$couple%in%couple_simuC] = "3/ PC & GWCSE"
tmp_df$group[tmp_df$couple%in%couple_simuC] = "3/ PC & GWSSE"
if (noA) {
tmp_df2 = tmp_df[tmp_df$couple%in%couple_simuC,]
} else {
......@@ -842,7 +842,7 @@ plot_out = function(df_out, df_d , df_auc, df_recall_sup09_per_meth, meths = NUL
}
}
if (all(couple_simuD%in%tmp_df$couple)) {
tmp_df$group[tmp_df$couple%in%couple_simuD] = "4/ PC & CCSE"
tmp_df$group[tmp_df$couple%in%couple_simuD] = "4/ PC & CSSE"
tmp_df2 = rbind(tmp_df2,tmp_df[tmp_df$couple%in%couple_simuD,])
}
tmp_df = tmp_df2
......
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