hmeEM(y, x, lambda = NULL, beta = NULL, sigma = NULL, w = NULL, k = 2, addintercept = TRUE, epsilon = 1e-08, maxit = 10000, verb = FALSE)addintercept below.lambda is taken as 1/k for each x.beta parameters. Should be a pxk matrix,
where p is the number of columns of x and k is number of components.
If NULL, then beta has standard normal entries according to a binning method done on the data.lambda.k=2 is accepted.hmeEM returns a list of class mixEM with items:
addintercept = TRUE).arbmean = FALSE, then only the smallest standard
deviation is returned. See scale below.regmixEM
## EM output for NOdata.
data(NOdata)
attach(NOdata)
set.seed(100)
em.out <- regmixEM(Equivalence, NO)
hme.out <- hmeEM(Equivalence, NO, beta = em.out$beta)
hme.out[3:7]
Run the code above in your browser using DataLab