Compute EM algorithm
Created by
Mathematica
(September 8, 2003)