Displaying 1 result from an estimated 1 matches for "acm_call".
2011 Jan 11
0
modified FAST Script from package SensoMineR for the R community - Reg
...n, maxsum = max(lev)), ":")
agg = rep(0, J * max(lev))
for (i in 1:(J * max(lev))) {
agg[i] = nbp[[i]][2]
}
agg2 = na.omit(agg)
agg2 = as.factor(agg2)
if (graph) {
##x11()
plot(agg2, main = "Number of products per group")
}
acm_call = list(X = acm$call$X, marge.col = acm$call$marge.col,
marge.row = acm$call$marge.row, ncp = acm$call$ncp, quali =
acm$call$quali,
name.group = afm$call$name.group, sim = sim)
group_afm = list(coord = afm$group$coord, cos2 = afm$group$cos2,
contrib = afm$group$contri...