em_est_dist function

Optimise scale parameters in MixARgen models