Update mixture.R