order of facets in ggcoef_compare()

[guyabel]

Asked on community RStudio without much success.

Is there a way to control the order of the facets from a ggcoef_compare() plot?

library(GGally)
m1 <- lm(Fertility ~ Education + Catholic, data = swiss)
m2 <- lm(Fertility ~ Education + Catholic + Agriculture, data = swiss)
m3 <- lm(Fertility ~ Education + Catholic + Agriculture + Infant.Mortality, data = swiss)
ggcoef_compare(models = list(m1, m2, m3))

Would it not be more intuitive if the facets followed a default order of the variables entering the model building process (Education, Catholic, Agriculture, Infant.Mortality in the example above) ?

[larmarange]

Should be fixed in #427

library(GGally)
#> Le chargement a nécessité le package : ggplot2
#> Registered S3 method overwritten by 'GGally':
#>   method from   
#>   +.gg   ggplot2
m1 <- lm(Fertility ~ Education + Catholic, data = swiss)
m2 <- lm(Fertility ~ Education + Catholic + Agriculture, data = swiss)
m3 <- lm(Fertility ~ Education + Catholic + Agriculture + Infant.Mortality, data = swiss)
ggcoef_compare(models = list(m1, m2, m3))

^{Created on 2021-10-24 by the reprex package (v2.0.1)}

[larmarange]

In the meantime, you will find below a way to control the order of the facets with the current version of GGally. You need call directly ggcoef_plot() and to pass a data frame ordered the way you want the facets being displayed.

library(GGally) # current stable version
#> Le chargement a nécessité le package : ggplot2
#> Registered S3 method overwritten by 'GGally':
#>   method from   
#>   +.gg   ggplot2
library(tidyverse)
m1 <- lm(Fertility ~ Education + Catholic, data = swiss)
m2 <- lm(Fertility ~ Education + Catholic + Agriculture, data = swiss)
m3 <- lm(Fertility ~ Education + Catholic + Agriculture + Infant.Mortality, data = swiss)

# incorrect order
ggcoef_compare(models = list(m1, m2, m3))

# temporary fix
d <- ggcoef_compare(models = list(m1, m2, m3), return_data = TRUE)
d <- d %>% arrange(model, var_label)
ggcoef_plot(d, colour = "model", dodged = TRUE)

^{Created on 2021-10-24 by the reprex package (v2.0.1)}

[guyabel]

Great. Thanks