Update model.ord.R