Bug with adegraphics et plot(statisObject, option = ...)

[maxel62]

Using the package adegraphics, it's not possible to draw a statis object like in package ade4 :

• the option option (to select which components of the plot are displayed) from the function plot is no longer available
• plot(statisObject) without using the option option displayed the four components but the result is less comprehensible (the fontsize of each title or each axis label is smaller than in package ade4, some graphics have disappeared, axis scale of some graphics are different...)

Example based on help(statis) :

library(ade4)
data(jv73)
dudi1 <- dudi.pca(jv73$poi, scann = FALSE, scal = FALSE)
wit1 <- wca(dudi1, jv73$fac.riv, scann = FALSE)
kta3 <- ktab.within(wit1)
data(jv73)
statis3 <- statis(kta3, scann = FALSE)
plot(statis3, option = 3)
plot(statis3)
library(adegraphics)
plot(statis3)
plot(statis3, option = 3)

[aursiber]

• The option argument in the plot function for statis objects is actually useless in adegraphics. In adegraphics, graphics are objects you can store: g_statis3 <- plot(statis3) The plot.statis function creates a multiple graph (_gstatis3). You can reach one subgraph of _gstatis3 using [[ or $. For example, to extract the first subgraph, you can do g_statis[[1]] or g_statis3$inter (the subgraphs name are get by names(g_statis3)).

• Indeed, default graphical parameters are updated in adegraphics, comparing with ade4. You can modify a lot of graphical parameters (for example, psub.cex to update the font size of sub titles) and find several examples in the vignette of adegraphics.