X-Git-Url: https://git.auder.net/?p=valse.git;a=blobdiff_plain;f=pkg%2FR%2FinitSmallEM.R;h=7ffbade8f038df872523da832ae82ab9a57f741c;hp=bd5ce1779303f3d17bf727b30048d5768b7a12a6;hb=0930b5d395ef0a48d1f97f88ee533c13d0962759;hpb=7ac88d643dac3dccb17c3e81c7b3d3d1aa87c1af 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))