init_EMG <- EMGLLF(phiInit1[, , , repet], rhoInit1[, , , repet], piInit1[repet, ],
gamInit1[, , repet], miniInit, maxiInit, gamma = 1, lambda = 0, X, Y,
eps = 1e-04, fast)
init_EMG <- EMGLLF(phiInit1[, , , repet], rhoInit1[, , , repet], piInit1[repet, ],
gamInit1[, , repet], miniInit, maxiInit, gamma = 1, lambda = 0, X, Y,
eps = 1e-04, fast)