Update prior.ord.R