for report : reordering col and row ari plot

This commit is contained in:
Louis Lacoste 2024-07-25 15:13:28 +02:00
parent 44cf03627d
commit f78d232d8a

View file

@ -105,7 +105,7 @@ ari_df <- results_df |>
names_pattern = "(row|col)_(LBM|colBiSBM)"
) |>
mutate(model = ifelse(method == "LBM", paste0("sep-", model), model)) |>
mutate_at(vars(model, struct), as.factor) |>
mutate_at(vars(model, struct, dim, method), as.factor) |>
mutate(model = forcats::fct_relevel(
model,
"iid", "sep-iid", "pi", "sep-pi", "rho", "sep-rho", "pirho", "sep-pirho"
@ -118,7 +118,7 @@ levels(ari_df[["model"]]) <- levels(ari_df[["model"]]) |>
str_replace("pi$", "$\\\\pi$") |>
str_replace("rho$", "$\\\\rho$")
ari_df[["dim"]] <- relevel(ari_df[["dim"]], ref = "row")
dim.labs <- c("Rows : $d = 1$", "Columns : $d = 2$")
names(dim.labs) <- c("row", "col")