relabel | R Documentation |
The components are sorted by the value of one of the parameters or according to an integer vector containing the permutation of the numbers from 1 to the number of components.
relabel(object, by, ...)
## S4 method for signature 'FLXdist,character'
relabel(object, by, which = NULL, ...)
object |
An object of class |
by |
If a character vector, it needs to be one of |
which |
Name (or unique substring) of a parameter if |
... |
Currently not used. |
Friedrich Leisch and Bettina Gruen
set.seed(123)
beta <- matrix(1:16, ncol = 4)
beta
df1 <- ExLinear(beta, n = 100, sd = .5)
f1 <- flexmix(y~., data = df1, k = 4)
## There was label switching, parameters are not in the same order
## as in beta:
round(parameters(f1))
betas <- rbind(beta, .5)
betas
## This makes no sense:
summary(abs(as.vector(betas-parameters(f1))))
## We relabel the components by sorting the coefficients of x1:
r1 <- relabel(f1, by = "model", which = "x1")
round(parameters(r1))
## Now we can easily compare the fit with the true parameters:
summary(abs(as.vector(betas-parameters(r1))))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.