X-Git-Url: https://git.auder.net/images/pieces/%22%20%20%20VariantRules.getPpath%28board%5Bi%5D%5Bj%5D%29%20%20%20%22.svg?a=blobdiff_plain;ds=sidebyside;f=R%2Fmain.R;h=1908021cd740e91f472d78abed85d4b57997e361;hb=f1b0e0abc369eed5b917a5fe70a05592067a78d2;hp=42852d368f19592ab4a0ca7565dfc99a63b6f36b;hpb=22d21a222df140221657af24d71fe05af54a6adc;p=valse.git diff --git a/R/main.R b/R/main.R index 42852d3..1908021 100644 --- a/R/main.R +++ b/R/main.R @@ -92,7 +92,7 @@ Valse = setRefClass( #smallEM initializes parameters by k-means and regression model in each component, #doing this 20 times, and keeping the values maximizing the likelihood after 10 #iterations of the EM algorithm. - init = initSmallEM(k,X,Y,eps) + init = initSmallEM(k,X,Y) phiInit <<- init$phi0 rhoInit <<- init$rho0 piInit <<- init$pi0