X-Git-Url: https://git.auder.net/?a=blobdiff_plain;f=pkg%2FR%2FinitSmallEM.R;h=7ffbade8f038df872523da832ae82ab9a57f741c;hb=9ccdd55a1f6e9d409e8ae43b878a5e89c42e20c7;hp=bd5ce1779303f3d17bf727b30048d5768b7a12a6;hpb=4d9db27f0d1749e5577038dedbc5f4d0826f2772;p=valse.git diff --git a/pkg/R/initSmallEM.R b/pkg/R/initSmallEM.R index bd5ce17..7ffbade 100644 --- a/pkg/R/initSmallEM.R +++ b/pkg/R/initSmallEM.R @@ -13,7 +13,7 @@ initSmallEM = function(k,X,Y, fast=TRUE) n = nrow(Y) m = ncol(Y) p = ncol(X) - nIte = 20 + nIte = 20 Zinit1 = array(0, dim=c(n,nIte)) betaInit1 = array(0, dim=c(p,m,k,nIte)) sigmaInit1 = array(0, dim = c(m,m,k,nIte))