R/muginit.R
In mmtfa: Model-Based Clustering and Classification with Mixtures of Modified t Factor Analyzers

muginit <-
function(G,p,x,zmat,ng){
	mug <- matrix(0,G,p)
	for(g in 1:G){
		mug[g,] <- colSums(zmat[,g]*x)/ng[g]
	}
	mug
}

Any scripts or data that you put into this service are public.

mmtfa documentation built on May 2, 2019, 1:45 p.m.

Note that we can't provide technical support on individual packages. You should contact the package authors for that.

Try the mmtfa package in your browser