X-Git-Url: https://git.auder.net/?p=valse.git;a=blobdiff_plain;f=R%2Fmain.R;h=1908021cd740e91f472d78abed85d4b57997e361;hp=42852d368f19592ab4a0ca7565dfc99a63b6f36b;hb=e3f2fe8a918614d246fe2451065b0dfcd348b366;hpb=07848d25af9f342f7d8e2dd103f2502d945afe54

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